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SECTION  1 

SUMMARY  AND  INTRODUCTION 

This  document  presents  the  latest  version  of  the 
NHTSA  Hybrid  Computer  Vehicle  Handling  Program  (HVHP) , which 
is  operational  at  the  Applied  Physics  Laboratory,  Johns 
Hopkins  University,  Many  refinements  have  been  incorporated 
into  the  simulation  since  the  publication  of  Reference  [3]  . 

In  particular,  heavy  or  light  vehicles  of  any  suspension 
type  can  now  be  simulated,  vehicle  aerodynamic  characteristics 
are  now  represented  and  the  tire  model  has  been  further  re- 
fined. 


The  Applied  Physics  Laboratory  first  became  involved 
in  the  prediction  of  vehicle  dynamic  performance  via  simula- 
tion in  May  of  1972.  At  that  time  APL  was  requested  by  NHTSA 
to  move  to  APL  an  existing  vehicle  simulation  operational  on 
the  hybrid  computer  at  the  Bendix  Research  Laboratories  [4,5].* 
NHTSA' s motive  in  moving  the  simulation  was  to  make  it  avail- 
able to  all  NHTSA  contractors  for  vehicle  research.  APL 
reprogrammed  the  Bendix  simulation  for  its  hybrid  computer 
without  change  of  the  model  and  published  the  result  in 
Reference  [2],  The  derivation  of  the  original  HVHP  model 
is  presented  in  Reference  [6] . 

Work  with  NHTSA  contractors  began  in  July,  1973,  when 
APL  started  providing  simulation  service  to  the  Calspan  Cor- 
poration on  the  NHTSA  research  into  tire  properties®  effects 
on  vehicle  handling  [7].  During  the  work  with  Calspan,  two 
primary  simulation  modifications  were  completed; 

* Numbers  in  brackets  refer  to  references . 
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(1)  a very  flexible  user  interface  for  inter- 
active simulation  control  designed  at  APL 
was  added  by  APL 

(2)  a new  tire  force  and  moment  model  specified 
by  Calspan  was  added  by  APL. 

Also  added  to  the  simulation  about  this  time  was  the  capa- 
bility to  automatically  initialize  the  simulation  to  perform 
any  of  the  six  Vehicle  Handling  Test  Procedures  (VHTP's)  and 
to  collect  and  process  the  data  required  to  calculate  the 
vehicle  performance  comparison  variables  (PCV) . These  VHTP's 
and  PCV's  were  originally  developed  by  HSRI  (Highway  Safety 
Research  Institute,  University  of  Michigan)  in  References  [8] 
and  [9]  and  restated  for  computer  implementation  by  APL  in 
Reference  [10].  The  result  of  this  work  was  the  HVHP  (Hybrid 
Computer  Vehicle  Handling  Program)  documented  in  Reference 

[3]  . 


The  computer  program  was  further  extended  in  1974  by 
the  Dynamic  Science  Division  of  Ultrasystems,  Inc.  to  simu- 
late features  of  recreational  vehicles  [14].  These  features 
included  aerodynamic  effects,  solid  front  axle,  dual  rear 
wheels,  and  four-wheel  drive.  These  program  modifications 
have  been  implemented  and  verified  with  full-scale  vehicle 
testing. 

Currently,  dynamic  performance  of  vehicles  of  the 
following  suspension  types  can  be  predicted  by  the  HVHP: 
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(1)  independent  front  and  rear, 

(2)  independent  front  with  solid  rear  axle, 

(3)  independent  front  and  solid  rear  axle  with 
dual  rear  tires 

(4)  solid  front  and  rear  axles, 

(5)  solid  front  and  rear  axles  with  dual  rear 
tires . 

Validation  of  each  suspension  type  has  been  accomplished  by 
comparison  of  simulation  and  full  scale  test  data. 

In  its  work  with  NHTSA  contractors,  APL  has  added  to 
the  simulation  model  any  refinements  required  by  the  con- 
tractor to  successfully  complete  his  research  and  the  simula- 
tion has  proven  to  be  economical  for  vehicle  dynamic  performance 
prediction.  User  experience  with  the  HVHP  has  shown  that  while 
performing  parametric  runs,  500  seconds  of  vehicle  motion  can 
be  simulated  in  one  hour  of  computer  use.  This  translates 
to  a cost  of  less  than  $0.50  per  vehicle  simulation  second  and 
represents  a fifty  percent  utilization  of  the  available  com- 
puting time.  Since  this  simulation,  running  at  one-fourth 
of  real  time,  is  capable  of  900  vehicle  simulated  seconds 
per  hour,  approximately  fifty  percent  of  the  time  is  utilized 
for  observing  data  and  changing  parameters.  The  $0.50  per 
simulated  second  should  be  viewed  as  the  current  lower  cost 
limit . 


For  program  debugging  and  model  checkout,  fewer  runs 
are  made  in  a given  time  period  than  when  parametric  data 
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are  being  produced.  Therefore,  the  cost  per  vehicle  simu- 
lated second  would  increase.  However,  general  experience 
has  indicated  that  on-line  data  observation  for  debugging 
decreases  the  total  time  required  for  program  checkout. 
During  the  debug  phase , HVHP  cost  usually  ranges  between  one 
and  two  dollars  per  vehicle  simulated  second,  with  a de- 
creasing trend  toward  the  $0.50  per  second  figure. 
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SECTION  2 

HYBRID  COMPUTER  VEHICLE  HANDLING  PROGRAM 

2 . 1 INTRODUCTION 

Contained  in  this  section  is  a description  of  the 
hybrid  computer  vehicle  handling  program.  The  basic  mathe- 
matical model  is  described  in  terms  of  seventeen  degrees  of 
freedom.  The  perturbing  forces  and  moments  which  act  on 
the  vehicle  are  also  considered.  The  simulation  implementa 
tion  and  validation  are  discussed. 

2.2  SIMULATION 

2.2.1  Mathematical  Model 

The  simulated  vehicle  is  represented  by  a 
seventeen-degrees-of-freedom  model  which  consists  of: 


(1) 

A basic  six-degree-of-freedom  model 
the  vehicle  sprung  mass . 

of 

(2) 

A two-degree-of “freedom  front  wheel 
front  axle  model. 

or 

(3) 

A two-degree-of-freedom  rear  wheels 
rear  axle  model. 

or 

(4) 

A three-degree-of-freedom  steering 
model . 

system 

(5) 

A four-degree-of-freedom  wheel  rotational 
dynamics  model. 
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The  six  degrees  of  freedom  of  the  sprung  mass 
model  are  the  six  standard  translational  and  rotational  de- 
grees of  freedom  of  a body  moving  in  inertial  space;  trans- 
lation along  three  axes  and  rotation  about  each  axis . The 
two  front  wheel  degrees  of  freedom  represent  the  motion  of 
the  front  unsprung  masses.  For  an  independent  front  suspen- 
sion the  degrees  of  freedom  are  the  vertical  motion  of  each 
front  wheel.  If  the  front  suspension  represents  a solid  axle 
configuration,  the  two  degrees  of  freedom  are  the  rotation 
and  vertical  motion  of  the  front  axle.  A corresponding  dis- 
cussion describes  the  two  rear  wheel  degrees  of  freedom.  An 
analytical  representation  of  the  vehicle  model  showing  inde- 
pendent front  and  solid  rear  axle  suspensions  is  illustrated 
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A solid  rear  axle  representation  is  presented  in  Figure  1-2. 

The  vehicle  model  allows  the  following  options ; 

(1)  independent  rear  suspension  (two  rear  un- 
sprung masses)  with  two  degrees  of  freedom 
corresponding  to  the  vertical  motion  of 
each  rear  wheel. 

(2)  solid  front  axle  (front  unsprung  mass)  with 
two  degrees  of  freedom  corresponding  to  the 
vertical  motion  and  rotation  of  the  front 
axle . 

(3)  Dual  tires  on  a solid  rear  axle  with  either 
independent  front  suspension  or  solid  front 
axle . 

Inertial  coupling  between  the  sprung  mass  and  the  front  and 
rear  unsprung  masses  is  considered  but  external  forces  and 
moments  due  to  rolling  resistance  and  gyroscopic  effects  of 
the  rotating  parts  are  neglected. 

The  steering  system  is  represented  by  a lumped 
parameter  model  with  three  degrees  of  freedom  corresponding 
to  rotational  motion  of  each  front  wheel  about  its  steering 
pivot  and  translational  motion  of  the  connecting  steering  rod 
and  associated  mass  elements.  The  effects  of  steering  system 
friction  and  compliance  are  included.  The  tire  moments  about 
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each  kingpin  axis  are  functions  of  the  circumferential  and 
side  tire  forces,  tire  aligning  torque,  the  inclination  and 
caster  of  the  king  pins,  and  the  caster  trail  effects  of  the 
tires.  Steering  wheel  displacement  is  the  steering  system 
. input. 

Four  additional  degrees  of  freedom  (for  a total 
of  seventeen)  are  contained  in  the  rotational  equations  of 
motion  about  the  spin  axis  of  each  wheel.  These  equations, 
which  include  the  differential  effects  of  the  rear  wheels, 
yield  the  wheel  rotation  rates  from  which  slip  and,  in  turn, 
the  circumferential  and  lateral  friction  coefficients  are  com- 
puted. The  differential  equations  for  wheel  rotation  are 
assumed  to  be  isolated  from  the  coupled  differential  equations 
of  motion  of  the  sprung  and  unsprung  masses,  but  inertial 
interaction  between  the  drive  wheels  is  included. 

Forces  are  transmitted  between  the  sprung  and 
unsprung  masses  through  the  suspension  system.  The  suspension 
forces  include  spring  effects,  shock  absorbers,  auxiliary  roll 
stiffness,  coulomb  friction  and  "anti"  forces  such  as  anti- 
pitch and  antiroll.  The  suspension  deflections  are  calculated 
relative  to  the  suspension  equilibrium  position  which  varies 
with  vehicle  weight.  The  angular  orientation  (camber  angle, 
toe  angle,  caster  angle)  of  an  independently  suspended  wheel, 
relative  to  the  vehicle  body,  is  specified  as  a function  of 
the  suspension  deflection.  These  functions  are  input  relative 
to  the  equilibrium  vehicle  suspension  position  and  then  cor- 
rected to  the  new  equilibrium  position  for  varying  vehicle 
weight  configurations.  Compliance  coefficients  are  used  to 
relate  the  change  in  camber  angle  and  steer  angle  with  applied 
forces  and  moments  at  the  tire.  Provisions  are  also  incor- 
porated to  investigate  the  effects  of  degraded  suspension 
components . 


9 


THE  JOHNS  HOPKINS  UNIVERSITY 

APPLIED  PHYSICS  LABORATORY 

LAUREL.  Maryland 


The  force  of  gravity,  aerodynamic  forces  and 
moments , and  tire  forces  and  moments  generated  at  the  tire- 
road  interface  are  considered  the  only  important  externally 
applied  forces  and  moments  acting  on  the  vehicle.  The  tire 
forces  include  the  radial  force  arising  from  radial  tire  de- 
flection, the  side  force  arising  due  to  slip  angle  and 
inclination  angle,  and  the  circumferential  force  arising  from 
applied  torque.  Since  the  roadway  is  treated  as  a flat, 
horizontal  plane,  a "point-contact"  representation  of  the 
tire  is  used  to  obtain  the  radial  loading.  The  circumferen- 
tial force  calculation  uses  a two-straight-line  approximation 
of  friction  coefficient-slip  behavior.  The  side  force  cal- 
culations are  based  on  slip-angle  and  inclination-angle 
properties  of  the  tires  which  are  saturated  at  large  angles. 
Interaction  between  circumferential  and  side  forces  utilizes 
a modified  "friction-ellipse"  concept  which  "rolls  off"  side 
force  as  a function  of  tire  slip.  The  "rolloff"  characteris- 
tic is  an  empirical  relationship  obtained  from  tire  test  data. 
The  tire  aligning  torque  and  overturning  moment  are  modeled 
as  nonlinear  functions  of  lateral  force,  normal  force,  and 
inclination  angle.  To  account  for  differences  in  tire 
characteristics  at  the  front  and  rear  wheels,  provisions  are 
made  to  input  separate  parameter  sets  for  front  and  rear  tires . 

Open-loop  control  inputs  can  be  entered  in  the 
form  of  steering  wheel  angle  and  drive  or  brake  torque.  The 
drive  torque  is  generated  to  maintain  a constant  velocity  of 
the  vehicle.  The  brake  torque  magnitude  is  determined  from 
input  data  functions  of  brake  line  pressure  at  the  front  and 
rear  wheels.  Since  the  equations  of  motion  are  written  in 
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terms  of  a moving  vehicle  axis  system,  a coordinate  trans- 
formation is  required  to  relate  the  vehicle's  position  and 
orientation  with  respect  to  an  orthogonal  coordinate  system 
fixed  in  space. 

2.2.2  Allocation  of  Analog  and  Digital  Computer  Tasks 

Since  the  model  is  solved  on  a hybrid  computer, 
it  must  be  subdivided  for  solution  into  equations  to  be  solved 
on  the  analog  computer  and  those  to  be  solved  on  the  digital 
computer.  The  allocation  of  computing  tasks  was  determined 
using  the  following  guidelines: 

(1)  Function  generation  requiring  extensive 
algebraic  calculations  or  reference  to 
tables  of  values  should  be  performed  in 
the  digital  computer. 

(2)  System  variables  determined  from  the 
solution  of  differential  equations  should 
be  graded  according  to  response  time 
(time  constant) . The  differential  equa- 
tions representing  the  fastest  variables 
should  be  solved  on  the  analog  computer, 
and  the  remaining  on  the  digital  computer . 

Slight  compromises  to  the  task  allocation  determined  from 
the  above  rules  were  required  due  to  limitations  in  digital 
computer  computation  speed,  numbers  of  analog  computer  com- 
putation modules,  and  available  analog-to-digital  and  digital- 
to-analog  data  communications  modules. 
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The  present  allocation  of  computing  tasks  be- 
tween the  analog  and  digital  computers  is  presented  in  Figure 
2-1.  Calculated  in  the  digital  portion  are  the  sprung  mass 
equations  of  motion,  wheel  orientation  angles,  and  tire  force 
equations.  Wheel  brake  and  drive  torques,  velocities  of  the 
tire  contact  point,  and  resultant  forces  and  moments  are 
also  computed  in  the  digital  portion. 

The  analog  computations  include  the  suspension 
forces , shock  absorber  and  wheel  spring  functions , longitudinal 
wheel  slip,  and  circumferential  coefficient  of  friction.  In 
addition,  the  equations  of  motion  of  the  unsprung  masses  and 
steering  system  equations  are  solved  on  the  analog  computer. 

The  hybrid  simulation  is  time  scaled  to  run  at 
one-fourth  real  time,  i.e.,  twenty  seconds  of  clock-on-the- 
wall  time  is  required  for  five  seconds  of  vehicle  simulation. 

2.2.3  Implementation  of  the  Mathematical  Model 

2.2.3. 1 Analog  Portion 

The  APL/JHU  hybrid  computer  facility  (Appendix  C) 
contains  analog  machines  manufactured  by  Electronic  Asso- 
ciates, Inc.  (EAI) . The  portion  of  model  programmed  on  the 
analog  computer  is  divided  between  models  of  EAI  analog  com- 
puters. The  entire  steering  system  is  contained  on  an  EAI 
231 -R  and  the  rotational  wheel  dynamics,  circumferential 
friction  coefficient  calculation,  tire  deflection,  and  sus- 
pension dynamics  contained  on  an  EAI  680.  Data  communication 
with  the  digital  computer  is  provided  by  24  multiplying 
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Fig.  2*1  Hybrid  Simulation  Block  Diagram  of  the  HVHP  Model 
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2.3  USER'S  INTERFACE 

The  interface  between  the  engineering  user  and  the 
computer  has  been  designed  to  maximize  user  control  and  in- 
formation retrieval  from  the  hybrid  computer  [13].  The 
interface  has  been  implemented  by  a set  of  generalized  input/ 
output  subroutines.  Using  these  communication  routines,  the 
following  necessary  tasks  can  be  accomplished  interactively 
at  the  CRT  hybrid  control  console: 

o Interrogation  of  any  digital  variable,  including 
arrays , by  name . 

e Assignment  of  new  values  to  any  digital  parameter 
or  initial  condition. 

• Tracking  and  printing  the  values  of  any  digital 
variable  as  a function  of  time. 

e Printing  the  end  of  run  values  of  any  digital 
variable  or  parameter. 

• Performing  automatically  a group  of  parametric 
runs  varying  one  or  more  parameters  or  initial 
conditions  by  an  arbitrary  amount. 

• Assigning  new  digital  variables  to  the  DAC's 
(digital-to-analog  converters)  and  ADC's  (analog- 
to-digital  converters) . 
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• Rescaling  the  digital  variables  output  on  the 
DAC ' s or  input  on  the  ADC ’ s . 

• Commenting  the  computer  output  with  observations 
pertinent  to  the  computer  runs . 

• Printing  the  value  of  all  digital  variables  on 
command . 

The  usefulness  of  these  routines  is  augmented  by  having  the 
following  features; 

• The  output  unit  for  all  digital  computer  responses 
is  selectable  (line  printer,  CRT,  or  both) . 

9 Extensive  subroutine  error  recovery  which  allows 
operation  by  untrained  personnel. 

o Free  format  input  which  obviates  the  need  to 

always  insert  decimal  points,  spaces,  etc.  which 
would  be  required  by  Fortran  syntax. 

An  explanation  of  the  modules  which  are  the  building  blocks 
of  the  routines,  as  well  as  a discussion  of  interaction,  is 
presented  in  Appendix  D. 

2.4  VHTP  MANEUVERS  AND  PERFORMANCE  COMPARISON  VARIABLES 

Due  to  the  importance  of  handling  test  procedures  in 
vehicle  research,  the  HVHP  was  programmed  to  automatically 
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perform  those  defined  for  passenger  cars  [10].  The  associ- 
ated performance  comparison  variables  (PCV's)  for  the  VHTP ' s 
are  also  calculated.  Since  test  procedures  generally  employ 
the  input  commands  of  braking,  steering,  and  combinations  of 
braking  and  steering,  the  HVHP  implementation  can  generally 
be  used  to  generate  test  procedures  for  all  types  of  vehicles. 
The  performance  comparison  variables  are  less  general  and 
refer  specifically  to  the  NHTSA  passenger  vehicle  VHTP ' s 
defined  in  Reference  [10]. 

2.4.1  VHTP  Maneuvers 


The  simulation  has  the  capability  of  self- 
initializing  to  perform  any  of  the  six  automobile  VHTP  maneu- 
vers and  calculating  the  performance  comparison  variables 
appropriate  for  the  selected  VHTP.  Utilizing  the  communication 
routines,  a VHTP  is  selected  by  addressing  the  Fortran  variable 
VHTPNO  and  assigning  it  a value  from  1 to  6 . The  value  of  0 
is  reserved  for  a special  check  run  that  verifies  correct 
dynamic  operation  of  the  simulation.  Once  a VHTP  has  been 
selected,  the  system  forcing  function,  pertinent  to  the  VHTP, 
can  be  accessed.  For  all  VHTP ' s the  Fortran  variable  PFL 
represents  brake  line  pressure.  For  VHTP ' s 2 to  6 , the  steer- 
ing wheel  input  has  the  Fortran  name  STR2 , STR3 , etc.  The 
names  PFL,  STR2 , etc.  can  be  used  in  the  multi-run  routine 
to  simulate  a series  of  VHTP  tests  in  which  the  brake  line 
pressure  or  steering  wheel  input  is  incremented.  By  conven- 
tion, when  a VHTP  is  selected  in  which  the  steering  input  is 
normally  a parameter  (VHTP  2,  4,  5),  the  STR  variable  contains 
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the  steering  wheel  rotation  required  to  input  2.0  degrees 
of  normalized  steer.  This  value  is  required  for  run  series 
in  which  the  steering  is  incremented. 

2.4.2  VHTP  Performance  Comparison  Variables 

Performance  comparison  variables  are  output 
in  both  the  single  run  and  multiple  run  modes.  If  a single 
run  is  executed,  a general  comparison  variable  format  is 
selected  in  which  all  PCV's  are  output.  However,  only  those 
pertinent  to  the  selected  VHTP  will  be  non-zero.  If  a series 
of  runs  is  executed,  the  output  is  in  a tabular  format  with 
the  forcing  function  (steering  wheel  angle  or  brake  line 
pressure)  starting  in  the  left  column  followed  by  the  perti- 
nent PCV's.  An  example  is  presented  in  Figure  2-2,  in  which 
the  following  occurs; 

(1)  VHTP  4 is  selected 

(2)  The  STR4  variable  is  interrogated  to  de- 
termine the  steering  wheel  rotation  for 
2 degrees  of  normalized  steer. 

(3)  The  steering  wheel  input  is  set  equal  to 
300  degrees. 

(4)  A single  run  is  executed. 

(5)  A run  series  of  four  runs  is  set  up  with 
STR4  initialized  to  two  degrees  normalize 
steer  (NS)  and  incremented  by  two  degrees 
NS  in  each  run. 
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(6)  A multiple  run  is  executed. 

(7)  The  program  is  terminated. 

A representative  parametric  run  series  for  each  VHTP  is  pre- 
sented in  Figures  2-3a  to  2-3f.  Performance  Comparison 
Variable  graphs  for  four  vehicles  are  presented  in  Appendix  F 

2 . 5 VALIDATION 


The  HVHP  has  been  used  extensively  for  predicting 
vehicle  performance  while  APL  has  worked  cooperatively  with 
many  NHTSA  contractors.  Through  cooperative  research  efforts 
with  four  different  NHTSA  contractors  the  HVHP  has  been  vali- 
dated at  least  once  for  each  type  of  suspension  configuration 
and  many  times  for  the  standard  American  passenger  car  sus- 
pension. In  each  case  validation  consisted  of  the  contractor 
comparing  simulation  and  full  scale  test  time  history  respon- 
ses. Therefore,  in  addition  to  APL  validation,  the  HVHP 
performance  has  been  examined  by  engineers  with  extensive 
backgrounds  in  vehicle  handling. 

2.5.1  NHTSA  Research  Programs 

The  following  are  summaries  of  recently  com- 
pleted NHTSA  research  programs  in  which  the  HVHP  was  utilized 

2. 5. 1.1  Passenger  Car  Tire  Effects  Program 

The  HVHP  was  used  extensively  for  vehicle  simu- 
lation while  APL  worked  cooperatively  with  the  Calspan  Corp. 
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on  DOT  contract  HS-053-3-727  [7] . For  this  contract,  "Re- 
search on  the  Influence  of  Tire  Properties  on  Vehicle 
Handling,"  Calspan  was  responsible  for  refining  the  tire/ 
road  interface  model  which  APL  incorporated  into  the  HVHP. 
.Calspan  monitored  the  simulation  modification  and  examined 
the  output  for  authenticity. 

In  the  performance  of  this  research  over  2000 
simulated  VHTP ' s were  run.  Four  vehicles  were  simulated; 
Chevrolet  Brookwood  station  wagon.  Dodge  Coronet,  Pontiac 
Trans  Am,  and  Volkswagen  Super  Beetle.  For  each  vehicle,  a 
complete  set  of  VHTP ' s was  performed  using  simulated  OE 
(original  equipment)  tires.  Parametric  studies  were  then 
performed,  varying  tire  parameters  to  determine  their  effect 
on  vehicle  handling  performance.  The  performance  comparison 
variable  graphs  for  the  original  equipment  tire  configuration 
runs  are  presented  in  Appendix  F of  this  report. 

2 . 5 . 1 . 2 VHTP ' s for  Recreational  Vehicles 

The  HVHP  was  used  extensively  for  vehicle  simu- 
lation while  APL  worked  cooperatively  with  the  Dynamic  Science 
Division  of  Ultrasystems,  Inc.  on  DOT  contract  HS-4-00853 
[14].  For  this  research,  " Handling  Test  Procedures  for 
Light  Trucks,  Vans  and  Recreational  Vehicles",  Dynamic  Science 
was  responsible  for  redefining  the  HVHP  model  to  simulate  a 
wider  class  of  vehicles.  During  the  course  of  this  contract 
the  suspension  options  were  broadened  to  permit  simulation  of 
any  of  the  following  suspension  types: 
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TERMINAL  ACTIVE 

HYBRID  VEHICLE  HANDLING  PROGRAM 
HYBRID  COMPUTER  PROS*  91 
CARNEW  LOAD  MODULE 
D0DGE71  VEHICLE 


ENGAGE  PATCH  PANEL  FOR  TEST 
TYPE  CR  WHEN  READY 

MAY  12  1976 

TIME  1115:  0.46 
OPTION 

F 

ENTER 

«»»»  VHTPNO  4 
«»#» 

OPTION 
»»»»  IC 
OPTION 

F 

ENTER 
»**»  STR4 
27.93 

«»»»  STR4  300 
OPTION 

X 

MAY  12  1976 

TIME  1 1 : 16 : 0.94 
RUN  1 HAS  STARTED 

OUTPUT  BELOU  « 

AXAV=  0.0  DECL  TIME=  0.000  AVCUR=  0.720  BIDMAX=  0.222  BTMAX=  0.171  DELBT=  0.172 
AYMAX=  0.762 .PHIMAX=  7.754  RMAX=  0.572  LANE  CHNG  DEL=  0.0  DEL.PSI=  0.0  MAX  STEER=  300.000 
FTRaMAX=  0.  RTROMAX^  0. 

OPTION 

F 

ENTER 

«•**  VHTPNO  4 
*»»* 

OPTION 

MULTI 

NUM  OF  LOOPS; VARS 

»»»»  4 1 

VAR 

*»*»  STR4 
LOOP ;VAL; INC 
«»»»  1 27.9  27.9 

OPTION 
«**»  XM 

MAY  12  1976 

TIME  11 : 1 7 ; 24.42 
RUN  2 HAS  STARTED 
OUTPUT  BELOU 


MULTI 

TOTAL 

STR4..I  1 

) BETAMXI  1 1 

BETDMXI  1 ) 

CUVRATI  1 ) 

AYMAX. I 1 ) 

RMAX. . ( 1 ) 

1 

9 

27.9 

0.363E-02 

0.1 23E-01 

0.579E-01 

0.754E-01 

0.431E-01 

2 

3 

55.0 

0. 104E-01 

0.331E-01 ■ 

0.150 

0.107 

0.114 

3 

4 

03.7 

0. 196E-01 

0.530E-01 

0.247 

0.305 

0.104 

4 

OPTION 

5 

112. 

0.340L  ;1 

0.761E-01 

0.344 

0.422 

0.256 

TERM 

MAY  12  1976 

TIME  11 : 1 9 : 1 1 .53 
PROGRAM  TERMINATED 


Fig.  2-2  HVHP  User's  Interactive  Control 


22 


THE  JOHNS  HOPKINS  UNIVERSITY 

APPLIED  PHYSICS  LABORATORY 

LAUREL.  Maryland 


iX  o o 


ro  o 


ro  0^  o o 


>3 


C-i  O 
uJ 

IN.  -32  -32 
^ -32  ^ ^ O 
- -32  ^ 

u_  O O O O 


Ci-  O O O 


Q. 

h- 

I 

> 

O 


><-  o o o o 

fill 
UJ  UJ  UJ  UJ 
•32  o in 
a ^ c-i 

X < < < 

<I  o o o o 
x: 

V 

c 


^ in 

f\  o ?\  i\ 


C 

_o 

u 

CO 

Q> 

c 

0. 

T 

> 

T 


CO 


op 

CVJ 


iZ 


rv<!0<s- 
— In  in  in 

^ in  <1  'C 

> o o o o 

<I  i I I ! 

X 

<r 


Q 

o o o 

Q 

<1 

Ui 

4 

o o o o 

Ps 

o 

r— 

4 

rrj  ^ in 

'C 

Cd 

cs 

Cd 

4 

o 

■<- 

4 

<I 

3 

> 

o 

in 

f- 

! 8_ 

•s 

C-i 

;• 

o 

C/3 

CJ; 

O 

3 

2 

H-l  u. 

2 

o 

•4— 

O 

3 

Cu 

1-  O 

H- 1 

o 

in 

<r 

-j 

<C 

1- 

-J  o 

-1 

-V 

ro 

X LiJ 

rs  -30  ■> 

o 

X 

o 

3 -J 

Lu 

2 

o 

a a 

•4- 

u. 

> 

2 

Cl 

<r 

•r- 

X 

4— 

i\ 

h— 

2 

2 

> 

2 

H* 

cc 

O 

O 

O 

■% 

O 

3 

i— 1 

u 

« 

t-i 

t— » 

« 

u. 

« 

sc 

hH 

Sc 

LlI 

X 

1“ 

* 

1- 

:4c 

1- 

« 

H 

« 2 

Cd 

4c 

O 

* 

SC 

H- 

Sc 

>- 

2 

2 

►— 

3 

'T-  r-j  ro 

« 

z 

« 

:|c 

Cl 

« 

LL. 

* 3 

« 

o 

* 

« 

S: 

<I 

H-l 

3 

3 

n? 

* 

Ui 

* 

c— J 

3|C 

o 

2 

Sc 

> 

Sc 

SC 

SC 

f-t 

Sc 

2 

?— 

iX 

■3 

2 

23 


THE  JOHNS  HOPKINS  UNIVERSITY 

APPLIED  PHYSICS  LABORATORY 

LAUREL.  MARYLAND 


LU 

rO  >C  O 

— -r-  in  o 

* 3D  ^ • 

u.  O © O 
-J 


ro 


o 

! 


LiJ 

in  ^ o © 
^ C-4  © © 


CM 

6 


© >0  CN  i> 
^ ^ >0  © 
T-  • •«  ro  c-4 

<i  ^ ^ - 

Ld  © © 


0. 

I- 

X 

> 


c 

o 


>»-©©©© 


c-j  o © •© 
— in  rv  © ro 

X Ci  <r  in  rv 

j:  4 , ^ « 

© © © © © 


Q. 

X 

> 

X 


© © © © 
_ © © o © 
4 ro  ro  po  r<3 


CO 

CM 

U> 


c-4  ro  in  S3 

~ r-4  ro  in  S3 

4 in  'O  S3 

UJ  , 4 . 4 

> © © © © 

<i  I I [ I 
X 
<E 


r-j 

o 

2 

u. 

i— 

X O 

Lu  > 

2 2 
O iX  o 

1-H  * LlJ  * f-H  # 

i_  * ^ * * »“  # 

-X  * 2 * * iX  * 

C ^ U!  # X * 


<r  © 

> © 


2 

O 


»-  O 

_l  O ^ -J 

X _J  X 

X X 


X- 

o 


HI  * « « 

i-  « X 3te  X « 

X 3(t  X * <1  * 

G 2 # > 


O 

2 


<I 

> 


X 

o 

o 


© 

© 

ro 


2 

X 

# * H-l 

* * i— 

4c  « X 

C 


© ^ 

S3  X ^ 

rs  •<)  H- 

> ^ X 

^ t <E  _J 

© k-  X 

r-4 » X 

© ■•  3 

•4-  !>  O — 1 

<L  U <Z 

••  I X *- 
X in  iSi  X 

X ro  i“ 


* > X 2 i-  -J 

* <r  Hs  X X X 
X >-  i:  G r 


© © © © 
© © © © 
M Ln  S3 


PO  in  S3 


^ r-4  ro  ^ 


24 


THE  JOHNS  HOPKINS  UNIVERSITY 

APPLIED  PHYSICS  LABORATORY 

LAUREL.  Maryland 


OPTION 

ENTER 

VHTPNO  3 

OPTION 

IC 

OPTION 

F 

ENTER 

«»»»  STR3  139 

OPTION 

«»»»  HULTI 

NUM  OF  LOOPS' /VARi’ 

3 2 

VAR 

■XXX  X BMPN 
LOOP /VAL/ INC 
xxxx  1 8 G 
•xxxx  2 1 G G 
■xxxx  3 1 3 G 
■xxxx 
VAR 

■xxxx  RMPS 
LOOP /VAL/ INC 
■xxxx  1 57.6  0 
■xxxx  2 48 .G  G 
xxxx  3 37*7  G 
xxxx 
OPTION 
xxxx  XM 

MAY  10  1976 

TIME  15:43:28.49 
RUN  2 HAS  STARTED 
OUTPUT  RELOU 


MULTI 

TOTAL 

RMPN. . ( 

1 ) BMPS. . ( 1 ) 

AYMAX.I  1 

) RMAX. . ( 1 

t CUVRAK  1 

) BETDMXI 

1 

'> 

8. GO 

57.6 

G.584 

G.331 

0 . 858 

G . 1 29 

o 

3 

1G.G 

48.  G 

G.786 

G.389 

G.S76 

G.373 

3 

4 

13. G 

37.7 

G.787 

0.336 

0.793 

0.224 

Fig.  2-3c  HVHP  Interaction  for  VHTP  No.  3 
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OPTION 
KKJHt  F 
LNTER 

VHTPNO  4 

OPTION 

IC 

OPTION 

F 

ENTER 

STR4 

27.93 

OPTION 

MULTI 

NUM  OF  LOOPS /VARS 
4 1 

VAR 

**»»  STR4 
LOOP /VAL/ INC 
**»»  1 55.06  55.06 

»««« 

OPTION 

XM 

'MAY  10  1976 

TIME  11  11:  1.10 
RUN  10  HAS  STARTED 
OUTPUT  BELOW 


MULTI 

TOTAL 

STR4. . ( 1 ) 

BETAMXI  1 ) 

BETDMXI  1 ) 

CUVRATl  1 ) 

AYMAX.I  1 

) RMAX. . ( 

1 

10 

55.9 

0. 105E-01 

0.336E-01 

0.150 

0.109 

0.115 

2 

19 

112. 

0.346E-01 

0.775E-01 

0.346 

0.425 

0.257 

3 

20 

1 60. 

0.709E-01 

0.125 

0.493 

0.509 

0.306 

4 

21 

223. 

0.112 

0.177 

0.606 

0.607 

0.474 

Fig,  2-3d  HVHP  Interaction  for  VHTP  No,  4 
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OPTION 

F 

ENTER 

VHTPNO  5 

-KN** 

OPTION 

IC 

OPTION 
««««  F 

ENTER 
•)(»*#  i'TR5 
27.93 

OPTION 
***»  HULTI 
NON  OF  LOOPS’ /VAR.V 
4 1 

VAR 

**»*  STR5 
I.  OOP/ VAL/  INC: 

1 5S.06  55.86 

OPTION 
«»»»  XM 

MAY  1G  1976 

TIME  11:17:20.88 
RUN  22  HAS  STARTED 
OUTPUT  BELOW 


MULTI 

TOTAL  STR5..(  1 

1 ) AYMAX. ( 1 

) DEI ( 1 

1 ) BETAMXI  1 ) 

DELPSI ( 1 ) 

UIN. . . ( 

1 

22  55.9 
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9.73 
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9 
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6.40 
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-0. 135E-G2 

45.0 

3 

24  168. 
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4.54 

0.829E-G1 

-0.1 42E-01 

45.0 

4 

25  223. 
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5.88 

0.136 

-0. 464E-G1 

45.0 

Fig.  2-3e  HVHP  Interaction  for  VHTP  No.  5 
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Pb  = 300  PSI  Pb  = 400  PSI  Pb  = 500  PSI  Pb  = 600  PSI 


Fig,  2-4b  Time  Histories  — Straight  Line  Braking 
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Pb  = 300  PSI 


Pb  = 400  PSI  Pb  = 500  PS!  Pb  = 600  PSI 


Fig.  2-5a  Time  Histories  — Braking  in  a Turn 
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Fig.  2-5b  Time  Histories  — Braking  in  a Turn 
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N = 9 


N = 11 


N = 14 
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Fig.  2-6b  Time  Histories  — Turning  on  a Rough  Road 
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Fig.  2-7a  Time  Histories  — Trapezoidal  Steer 
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Fig.  2-8b  Time  Histories  — Sinusoidal  Steer 
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Fig.  2-9a 


Time  Histories  — Drastic  Steer  and  Brake 
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Fig.  2-9b  Time  Histories  — Drastic  Steer  and  Brake 
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(1)  independent  front  and  rear 

(2)  independent  front  and  solid  rear  axle 

(3)  solid  front  and  solid  rear  axle 

(4)  Dual  tires  on  a solid  rear  axle  with 
either  independent  front  wheels  or  a 
solid  front  axle 

A model  representing  vehicle  aerodynamic  properties  was  also 
added  at  this  time. 

In  the  performance  of  this  research,  over  2500 
recreational  vehicle  VHTP ' s were  run  and  five  vehicles  were 
simulated:  Ford  F-250  pickup  truck  equipped  with  a representa- 

tive 11  foot  camper,  Volkswagen  Campmobile,  Jeep  Wagoneer , 

Open  Road  motor  home  (type  C) , and  a Winnebago  motor  home 
(type  A) . Parametric  studies  were  performed  on  these  vehicles 
to  determine  appropriate  handling  test  procedures  for  small 
trucks  and  recreational  vehicles.  This  research  effort  is 
documented  in  References  [6]  and  [14], 

2. 5. 1.3  Truck  and  Bus  Tire  Effects  Program 

The  HVHP  was  used  extensively  for  vehicle  simu- 
lation while  APL  worked  cooperatively  with  HSRI  (Highway  Safety 
Research  Institute,  University  of  Michigan)  on  DOT  contract 
HS-4-00943  [15].  For  this  research,  "Effects  of  Tire  Proper- 
ties on  Truck  and  Bus  Handling" , HSRI  provided  APL  with  tire 
model  refinements  that  simplified  the  simulation  of  truck  tire 
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forces  and  moments.  Trapezoidal  and  sinusoidal  steer  VHTP ' s 
were  performed  using  simulated  OE  (original  equipment)  tires. 
Parametric  studies  were  then  performed  using  the  same  VHTP ' s 
varying  tire  parameters  to  determine  their  effect  on  vehicle 
handling  performance. 

In  the  performance  of  this  research,  over  1500 
simulated  VHTP ' s were  run  and  four  vehicles  were  simulated: 
Ford  Econoline  Van,  Ford  F-250  pickup  truck.  White  tractor, 
and  a GMC  intercity  bus . 

2. 5. 1.4  Passenger  Cars  Pulling  Trailers 


The  HVHP  was  used  for  vehicle  simulation  while 
APL  worked  cooperatively  with  STI  (Systems  Technology,  Inc.) 
on  DOT  contract  HS-4-00900  [16].  For  this  research,  "Passenger 
Cars  and  Light  Trucks  Pulling  Trailers",  STI  was  responsible 
for  defining  a trailer  model  that  was  compatible  with  the 
HVHP  and  could  be  added  to  it.  During  the  course  of  this  re- 
search a model  of  a one  or  two  axle  trailer  connected  to  a 
tow  vehicle  via  a ball  hitch  was  incorporated  into  the  HVHP. 
Braking,  steering,  and  combined  braking  and  steering  simula- 
tion runs  were  performed.  The  simulated  tow  vehicle  was  a 
Chevrolet  Caprice  station  wagon  and  the  towed  vehicle  was  a 
single  axle  trailer. 

2.5.2  Vehicle  Handling  Test  Procedures 

Time  Histories  for  a typical  set  of  VHTP  mane- 
vers  is  presented  in  Figures  2-4  to  2-9.  The  vehicle  simula- 
ted for  these  runs  is  the  1971  Dodge  Coronet.  A general 
discussion  of  HVHP  simulation  output  is  presented  in  Appendix  G. 
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2.5.2. 1 Straight  Line  Braking 

This  run  series  determines  the  value  of  brake 
line  pressure  at  which  two  wheels  on  the  same  axle  lock-up. 
.For  this  vehicle,  both  rear  wheels  were  locked  at  500  psi 
and  all  four  wheels  were  locked  at  600  psi. 

2. 5. 2. 2 Braking  In  a Turn 

This  run  series  determines  the  value  of  brake 
line  pressure  at  which  two  wheels  on  the  same  axle  lock-up 
while  the  vehicle  is  executing  a constant  0.3  gee  turn.  For 
this  vehicle,  the  inside  rear  wheel  was  locked  at  400  psi, 
both  inside  wheels  were  locked  at  500  psi,  and  all  four  wheels 
were  locked  at  600  psi. 

2. 5. 2. 3 Turning  On  a Rough  Road 

For  this  run  series,  the  vehicle  traverses  a 
bump  grid  while  in  a steady  0.4  gee  turn.  Three  grid  fre- 
quencies are  simulated:  9,  11,  and  14  Hz. 

2. 5. 2. 4 Trapezoidal  Steer 


In  this  run  series,  trapezoidal  steers  of  4, 
8,  12  and  16  degrees  of  normalized  steer  angle  were  used. 
For  this  vehicle,  28  degrees  of  steering  wheel  angle  is  re- 
quired for  2 degrees  of  normalized  steer. 
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2. 5. 2. 5  Sinusoidal  Steer 


In  this  run  series,  sinusoidal  steers  with  a 
maximum  amplitude  of  4,  8,  12  and  16  degrees  of  normalized 
steer  angle  were  used.  For  this  vehicle,  28  degrees  of 
steering  wheel  angle  is  required  for  2 degrees  of  normalized 
steer . 


2. 5. 2. 6  Drastic  Steer  and  Brake 

The  purpose  of  these  runs  is  to  determine  ve- 
hicle roll-over  tendency.  For  this  vehicle,  a peak  roll 
angle  of  0.14  radians  and  a peak  roll  rate  of  0.75  radians 
per  second  was  achieved. 

2.6  TIRE  DATA 


As  previously  stated,  the  current  HVHP  tire/road  in- 
terface model  was  defined  by  Calspan  as  part  of  DOT  contract 
HS-053-3-727  [7].  For  this  contract,  Calspan  tested  many 
tires  at  their  TIRF  (Tire  Research  Facility)  testing  complex  [11]. 
As  a convenience  for  working  with  APL  and  using  the  HVHP, 
the  TIRF  associated  computer  was  programmed  to  process  tire 
data  into  a format  directly  compatible  with  the  HVHP  tire 
model.  Therefore,  very  little  effort  is  required  to  prepare 
tire  data  for  input  to  the  HVHP  for  tires  which  have  been 
tested  on  the  TIRF  machine.  For  tires  tested  on  other  tire 
test  machines  or  flat  bed  testers,  APL  can  convert  the  data 
for  HVHP  use  with  the  TIRF  computer  data  processing  program. 

When  the  tire  test  data  has  been  properly  formatted,  the 
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program  output  will  be  compatible  with  the  HVHP.  However, 
data  preparation  for  the  latter  approach  can  be  very  time 
consuming.  A recent  tire  parameter  determination  research 
program  has  made  available  HVHP  compatible  data  on  approxi- 
mately 400  tires  of  sizes  usually  found  on  passenger  cars 
and  light  trucks.  These  tire  data  along  with  documentation 
of  the  research  can  be  found  in  Reference  [17]. 

2.6.1  Tire  Data  Validation 

A tire/road  interface  plotting  program  [18] 
was  developed  at  APL  to  validate  tire  model  data  used  as  in- 
put to  the  vehicle  simulation.  The  validation  approach  was 
to  generate  families  of  curves  of  desired  tire/road  interface 
functions  for  chosen  sets  of  conditions  which  could  be  cor- 
related with  data  obtained  from  tire  tests.  Given  values 
for  the  coefficients  and  parameters  of  the  tire  model  equa- 
tions f the  program  calculates  the  tire  model  functions  and 
produces  data  deck  compatible  with  the  input  requirements  of 
a Calcomp  plotting  subprogram  [19].  Tire/road  interface 
graphs  are  then  generated  by  the  subprogram.  Representative 
graphs  are  shown  in  Appendix  H. 

2.7  HVHP  INPUT  DATA 

2.7.1  Data  Deck  Description 

A general  input  data  deck  is  used  with  the  HVHP. 
Defined  in  the  data  deck  are  the  following: 
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(1)  Program  identification 

(2)  Default  output  variable  list  for  the  Track 
Option . 

(3)  Default  output  variable  list  for  the  Table 
Option  for  VHTP ' s performed  in  the  multi- 
run mode . 

(4)  Digital-to-analog  converter  variable  and 
scale  factor  assignments  input  as  pairs 

of  digital  variable  and  corresponding  scale 
factor . 

(5)  Analog-to-digital  converter  variable  and 
scale  factor  assignments  input  as  pairs 
of  digital  variables  and  corresponding 
scale  factor. 

(6)  Initialization  of  non-integer  parameters  or 
initial  conditions. 

(7)  Initialization  of  integer  parameters  or 
initial  conditions . 

(8)  Vehicle  simulated. 

(9)  Front  and  rear  camber,  caster,  and  toe  func- 
tions via  coefficients  for  a fifth  order 
polynomial  approximation. 
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(10) 

Front  and  rear  brake  torques  as  pairs  of 
brake  pressure  in,  brake  torque  out  data 
points . 

(11) 

Lateral  friction  coefficient  degradation 
with  circumferential  slip  as  pairs  of  per- 
cent slip  in,  percent  of  lateral  friction 
coefficient  out  data  points. 

(12) 

Aerodynamic  force  and  moment  coefficients 
as  pairs  of  aerodynamic  angle  of  attack  in, 
aerodynamic  coefficient  out  data  points. 

(13) 

Front  and  rear  spring  data  as  pairs  of  sus- 
pension deflection  in,  spring  force  out. 

(14) 

Wind  profile  data  as  pairs  of  distance  in, 
wind  velocity  out. 

(15) 

PARAM  data  array  members  which  are  used  to 
redefine  VHTP  condition  inputs  as  sequen- 
tial numbers  representing  the  PARAM  array 
element  number  and  the  corresponding  variable 
value  for  the  initial  check  run  and  each 
VHTP  number  1 to  6 . 

(16) 

Initial  values  of  individual  memlDers  of  the 
PARAM  vehicle  descriptor  data  array  input 
as  pairs  of  array  element  number  and  initial 
value . 
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The  input  data  for  three  recently  simulated 
vehicles  which  are  representative  of  the  HVHP  suspension 
types  are  presented  in  Appendix  E.  Also  presented  in  Appendix 
E is  a sample  of  the  PARAM  Table  for  each  vehicle  which  is 
output  to  the  system  line  printer  prior  to  each  simulation 
run.  This  provides  PARAM  value  documentation.  The  three 
vehicles  for  which  data  are  provided  are: 

(1)  VW  Campmobile,  independent  front  and  rear 
suspension 

(2)  Dodge  Coronet  independent  front  solid  rear 
axle  suspension 

(3)  Winnebago  Motor  Home,  solid  front  and  rear 
axle  suspension  with  dual  rear  tires. 

2. 7. 1.1  Program  Identification 

The  first  data  card  identifies  the  APL  problem 
number,  the  digital  computer  load  module,  and  the  vehicle 
simulated. 

2. 7. 1.2  Track  Output  Variables 

The  next  group  of  cards  defines  the  initial 
set  of  interactive  variables  to  be  output  when  the  track 
OPTION  is  enabled.  Fifty  variables  may  be  selected  on  as 
many  cards  as  is  required.  This  group  of  cards  is  terminated 
by  a blank  card.  This  list  may  be  altered  interactively  using 
the  Track  OPTION. 
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2. 7. 1.3  Table  Output  Variables 

The  next  group  of  cards  defines  the  variables 
to  be  output  at  the  end  of  each  run  when  the  multiple  run 
execution  mode  is  enabled.  This  group  contains  seven  cards, 
one  card  for  each  VHTP  (the  first  six)  and  one  for  the  check 
run.  A maximum  of  nine  variables  can  be  specified  per  card. 

If  the  Table  variables  are  respecified  interactively  via  the 
Table  OPTION  for  the  execution  of  a VHTP,  the  variables  in 
this  data  group  will  be  restored  when  that  VHTP  is  reselected. 

2. 7. 1.4  Digital-to-Analog  Variables 

This  group  of  cards  specifies  which  variables 
will  be  output  from  the  digital  to  the  analog  computer  and 
the  scale  factor  that  will  be  associated  with  the  digital-to- 
analog  conversion  (DAC) . Any  variable  may  be  output.  If  the 
variable  output  is  used  in  the  closed  loop  vehicle  model,  the 
scale  factor  must  be  consistent  with  the  use  of  the  variable 
on  the  analog  computer.  If  the  variable  output  is  used 
strictly  for  strip  chart  recorder  display  purposes,  the  scale 
factor  can  take  on  any  rational  value.  The  maximum  expected 
value  of  the  variable  is  an  appropriate  starting  value.  Either 
the  variable,  scale  factor,  or  both  may  be  reassigned  via 
the  interactive  OPTION  DACA.  Forty-eight  cards  must  be  in- 
cluded, one  for  each  digital-to-analog  output  in  the  order 
of  assignment  to  the  DAC's  0-47.  Each  card  contains  a vari- 
able name  followed  by  its  normalizing  scale  factor.  The 
list  is  terminated  by  the  character  string  ENDNODAC . 
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2. 7. 1.5  Analog-to-Digital  Variables 

This  group  of  cards  specifies  which  variables 
will  be  input  from  the  analog  to  the  digital  computer  and  the 
scale  factor  that  will  be  associated  with  the  analog-to-digital 
conversion  (ADC) . Any  variable  name  which  has  been  specified 
as  an  interactive  variable  and  exists  on  the  analog  computer 
may  be  input.  The  scale  factor  must  be  consistent  with  the 
use  of  the  variable  on  the  analog  computer.  Either  the  vari- 
able, scale  factor,  or  both  may  be  reassigned  via  the  inter- 
active OPTION  ADCA.  A change  in  variable  implies  a wiring 
change  on  the  analog  patch  panel.  Twenty-eight  cards  must 
be  included,  one  for  each  analog-to-digital  input  in  the 
order  of  assignment  to  ADC's  0-27.  Each  card  contains  a vari- 
able name  followed  by  its  analog  scale  factor.  Only  28  of 
the  available  48  ADC  channels  are  used  by  the  HVHP.  The  list 
is  terminated  by  the  character  string  ENDNOADC. 

2. 7. 1.6  Non-Integer  Variable  Initialization 

The  next  group  of  cards  allows  any  non-integer 
initial  condition  or  parameter  that  has  been  specified  as 
an  interactive  variable  to  be  assigned  an  initial  value. 

The  format  is  a name  followed  by  the  initial  value  with  a 
maximum  of  ten  pairs  per  card.  Any  number  of  cards  is  allowed 
and  the  input  is  terminated  by  a blank  card. 
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2 . 7 . 1 . 7 Integer  Variable  Initialization 

The  next  group  of  cards  allows  any  integer 
parameter  that  has  been  specified  as  an  interactive  variable 
to  be  assigned  an  initial  value.  The  format  is  a name  fol- 
lowed by  the  initial  value  with  a maximum  of  ten  pairs  per 
card.  Any  number  of  cards  is  allowed  and  the  input  is 
terminated  by  a blank  card. 

2. 7. 1.8  Vehicle  Identification 

This  data  card  is  used  to  document  the  vehicle 
being  simulated.  Any  message  confined  to  80  characters  is 
allowed. 

2. 7. 1.9  Camber y Caster^  and  Toe  Functions 

The  next  six  data  cards  define  the  front  wheel 
camber,  caster,  and  toe  and  the  rear  wheel  camber,  caster, 
and  toe  functions  in  degrees  for  wheel  displacement  (inches) 
from  the  unloaded  vehicle  suspension  equilibrium  position. 

One  function  is  defined  per  data  card  which  contains  the 
six  coefficients  required  to  specify  a fifth  order  polynom- 
ial approximation  to  the  appropriate  function.  The  order  of 
the  data  is  CO,  Cl,  ...,  C5.  CO  is  the  value  of  the  function 
(camber,  caster,  toe)  at  the  equilibrium  suspension  position 
of  the  unloaded  vehicle.  The  vehicle  simulation  uses  the 
right  front  and  rear  wheels  as  a reference  for  camber  and 
toe  data.  The  sign  of  the  coefficients  for  the  left  front 
and  rear  wheels  is  changed  in  the  digital  program.  Data  for 
these  functions  for  the  representative  vehicles  are  presented 
in  Appendix  E. 
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2.7.1.10  Brake  Torques 

The  next  group  of  data  cards  defines  the  front 
and  rear  brake  torque  functions.  The  function  is  specified 
as  pairs  of  data  points  one  pair  per  card,  a value  of  brake 
line  pressure  (pounds)  and  the  corresponding  value  of  the 
brake  torque  (inch-pounds) . A group  of  cards  (2  to  19)  de- 
fining each  function  is  ended  by  a data  card  containing  the 
number  99999.  A linear  interpolation  routine  is  used  to  ob- 
tain torque  values  for  brake  line  pressures  between  specified 
data  values.  Conventionally,  the  front  and  rear  brake  torque 
functions  are  identical  and  brake  proportioning  is  accomplished 
using  PARAM  array  elements  238-241  . 

2.7.1.11  Side  Force  Shaping  Function 

The  next  group  of  data  cards  defines  the  func- 
tional relationship  between  the  side  force  and  circumferential 
slip.  Pairs  of  data  points  are  input  one  pair  per  card  as 
percent  of  slip  and  the  corresponding  percent  of  possible  side 
force  which  is  attained.  The  function  data  (2  to  19  cards) 
is  terminated  by  a card  containing  the  number  99999.  Linear 
interpolation  is  used  between  data  points  to  obtain  inter- 
mediate function  values. 

2.7.1.12  Aerodynamic  Coefficients 

The  next  groups  of  data  cards  define  the  aero- 
dynamic force  and  moment  coefficients  as  tabular  functions 
of  the  aerodynamic  side  slip  angle  or  angle  of  attack.  Each 
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function  is  input  as  pairs  of  data  points  one  pair  per  card 
with  a maximum  of  19  cards.  The  format  is  an  angle  of  at- 
tack (radians)  followed  by  the  value  of  the  aerodynamic  co- 
efficient. The  input  order  of  the  functions  is  axial  force 
(C  ) , side  force  (C  ) , normal  force  (C  ) , roll  moment  (C, ) , 

X y 2 «L 

pitch  moment  (C^^)  and  yaw  moment  (C^)  . Each  functions  data 

cards  are  terminated  by  the  number  99999.  A linear  interpo- 
lation routine  is  used  to  obtain  function  values  for  angles 
of  attack  between  specified  data  values. 

2.7.1.13  Spring  Functions 

The  next  groups  of  cards  define  the  front  and 
rear  spring  functions  as  tabular  functions  of  suspension  de- 
flection from  the  equilibrium  position.  Each  function  is  input 
as  pairs  of  data  points,  one  pair  per  card,  with  a maximum  of 
nine  cards.  The  format  is  a suspension  deflection  (inches) 
followed  by  the  spring  force  (pounds) . The  data  is  input  for 
the  range  from  full  compression  to  full  rebound.  The  input 
order  of  the  spring  forces  is  right  front,  left  front,  right 
rear,  left  rear.  Each  function ' s data  cards  are  terminated  by 
the  number  99999.  A linear  interpolation  routine  is  used  to 
obtain  function  values  for  deflections  between  specified  data 
values . 


The  spring  force  at  each  wheel  is  implemented 
as  the  sum  of  a linear  segment  generated  on  the  analog  com- 
puter and  a digital  supplement  which  is  the  difference  between 
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the  analog  value  and  the  actual  spring  characteristic.  The 
sign  convention  for  deflections  from  equilibrium,  which  is 
zero  inches  and  a corresponding  suspension  force  of  zero 
pounds,  is  as  follows: 

(1)  compression  is  a negative  deflection  and 
produces  a negative  suspension  force. 

(2)  rebound  is  a positive  deflection  and  pro- 
duces a positive  suspension  force. 

Spring  data  for  three  representative  vehicles  is  presented  in 
Appendix  E. 

2.7.1.14  Wind  Profile 

The  next  group  of  data  cards  defines  the  aero- 
dynamic wind  disturbance  profile.  Pairs  of  data  points  are 
input  as  tabular  functions  of  longitudinal  distance  to  the 
center  of  the  wind  disturbance  profile  and  cross  wind  velocity. 
The  function  is  input  as  pairs  of  data  points,  one  point 
per  card,  with  a maximum  of  19  cards.  The  format  is  a dis- 
tance (inches)  followed  by  the  wind  velocity  (inches/second) . 
The  data  points  are  terminated  by  a card  containing  99999. 

A linear  interpolation  routine  is  used  to  obtain  cross  wind 
velocity  for  longitudinal  distance  between  specified  data 
points . 


2.7.1.15  VHTP  Initialization  Data 

The  next  group  of  cards  allows  the  input  of 
data  that  is  used  for  initialization  of  the  simulation  for 
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performing  a specific  VHTP  maneuver.  Since  this  data  is  in- 
put, VHTP  conditions  can  easily  be  varied.  Twenty-seven  data 
cards  are  required  with  each  card  containing  a PARAM  element 
address  and  a value  for  the  variable  represented  by  that 
address  for  the  check  verification  run  and  each  VHTP  1 to  6 , 
in  that  order.  The  PARAM  element  addresses  shown  in  the 
data  lists  are  required  for  VHTP  initialization.  However, 
the  input  order  is  not  fixed. 

2.7,1.16  Vehicle  Descriptor  and  Tire  Data 

The  last  group  of  cards  is  used  to  input  the 
initial  values  of  variables  which  are  elements  of  the  PARAM 
data  array.  This  array  is  used  to  input  all  vehicle  descrip- 
tor and  tire  model  data.  Since  the  array  is  also  used  for 
purposes  other  than  data  input,  such  as  storing  values  for 
program  calculated  initial  conditions,  program  flow  switch 
values,  etc.,  all  PARAM  elements  need  not  be  initialized. 

The  definitions  of  all  PARAM  elements  is  presented  in  Section 
4 of  Appendix  B,  The  subset  of  PARAM  elements  which  repre- 
sent vehicle  descriptors  or  tire  model  coefficients  is  pre- 
sented in  Section  5 of  Appendix  B.  Data  is  input  one  PARAM 
element  per  card  by  indicating  the  PARAM  element  address 
followed  by  the  assigned  value. 

2.7.2  Shock  Absorbers  and  Load  Dependent  Data 

In  addition  to  the  data  deck,  the  shock  ab- 
sorber functions  are  simulation  inputs.  The  shock  absorber 
functions  are  input  using  analog  function  generators. 
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2.7.2. 1 Shock  Absorber  Functions 


The  front  and  rear  shock  absorber  functions 
are  generated  using  analog  function  generators.  Since  the 
•function  generator  is  a versatile  analog  device,  the  shock 
absorber  characteristic  can  be  represented  as  a general 
function  of  suspension  deflection  rate.  However,  in  prac- 
tice, representation  by  three  or  four  line  segments  has 
proven  sufficient.  The  function  may  be  specified  for  input 
purposes  either  graphically  or  as  a list  of  slopes  for 
various  suspension  deflection  rates.  The  sign  convention 
for  suspension  motion  from  equilibrium,  which  is  zero  rate 
(inches  per  second)  and  a corresponding  zero  damping  force 
(pounds),  is  as  follows: 

(1)  A negative  suspension  deflection  rate 
(compression  motion)  produces  a negative 
shock  absorber  force. 

(2)  A positive  suspension  deflection  rate 
(rebound  motion)  produces  a positive  shock 
absorber  force. 

Shock  absorber  data  for  three  representative  vehicles  are 
presented  in  Appendix  E. 

2. 7. 2. 2 Load  Dependent  Data 

Since  the  HVHP  calculates  suspension  deflections 
relative  to  the  suspension  equilibrium  position  for  all  load 
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configurations,  information  specifying  the  suspension  travel 
from  the  unloaded  vehicle  suspension  position  must  be  pro- 
vided. Of  particular  interest  are  the  loaded  vehicle  con- 
figurations for  driver  control  used  in  VHTP ' s 1-3  and  for 
automatic  controller  used  in  VHTP's  4-6.  The  vehicle 
parameters  which  are  load  dependent  and  their  corresponding 
PARAM  element  addresses  are  as  follows: 


Variable 


PARAM  Address 


MS 


ZF 


4 


ZR 


5 


a 


6 


b 


7 


IZ 


IX 


lY 


1 1 
12 
13 


DELF 


92 


DELR 


93 
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SECTION  3 

CONCLUSIONS  AND  RECOMMENDATIONS 

The  Hybrid  Computer  Vehicle  Handling  Program  (HVHP) 
.has  demonstrated  realistic  dynamic  simulations  of  passenger 
vehicles  and  trucks  with  suspensions  ranging  from  four  wheel 
independent  to  solid  front  and  rear  axles . The  performance 
of  simulation  runs,  especially  those  involving  the  six 
vehicle  handling  test  procedures  (VHTP) , are  inexpensively 
and  easily  performed.  In  addition,  the  performance 
measuring  Vehicle  Performance  Comparison  Variables  (PCV) 
for  each  VHTP  are  also  provided. 

Although  good  correlation  between  the  HVHP  and  full- 
scale  test  data  has  been  achieved,  it  is  recommended  that 
changes  in  all  areas  of  the  model , including  the  tire/road 
interface,  the  vehicle  description,  etc.,  be  given  serious 
consideration  where  an  improvement  in  correlation  could  re- 
sult. The  HVHP  has  proved  to  be  a good  simulation  which  is 
easily  extended  to  meet  the  increasing  needs  of  predicting 
vehicle  behavior.  By  critically  reviewing  thei  simulation 
with  each  use  and  making  improvements  the  HVHP  will  continue 
to  be  a successful  engineering  tool. 
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APPENDIX  A 

VEHICLE  MATHEMATICAL  MODEL 


1 . INTRODUCTION 

This  Appendix  contains  the  vehicle  mathematical  model 
which  was  implemented  on  the  APL/JHU  hybrid  computer . The 
equation  numbers  associated  with  a particular  suspension,  axial 
or  tire  configuration  will  include  a notation  from  the  following 
legend : 

A solid  front  axle 

B solid  rear  axle 

C independent  front  suspension 

D independent  rear  suspension 

E solid  front  and  rear  axles 

F independent  front  suspension  and  solid 

rear  axle 

G independent  front  and  rear  suspensions 
H independent  front  suspension  and  dual 
tires  on  solid  rear  axle 
I solid  front  axle  and  dual  tires  on  solid 
rear  axle 
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Fig.  A-1  Hybrid  Simulation  Block  Diagram  of  the  HVHP  Model 
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Fig.  A-2  Analytical  Representation  of  the  Vehicle  Model 
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2 . 2 Equations  of  Motion  (Ten  Degrees  of  Freedom) 

The  equations  of  motion  of  the  sprung  and  unsprung  masses 
are  presented  below: 


(EM)  u + Yo  <3  = (2  M)  (vr  - wq  - g 6)  + E + E (1) 


xs 


(EM)  V - Y2  P + Y^  r = (EM)  (wp  - ur  + g (})) 


+ E F + E F 

yu  ys 


M w = M (uq  -vp+g)“  E S.  +EF 

S S j -1  ^ 


i=1 


zs 


(2) 

(3) 


■■^3  ^ ^ ^x^  P " ^^xz  ^xz^  ^ 

= "^3  (ur  - wp  - g (j))  + E + E 

Y.  ii  + (I^^  g = ^2  (vr  - wq  - g e)  + E + E N 

z y y ^ 


6s 


(4) 

(5) 


^ ■ ^^xz  ^ ^xz^  P (^z  ^z  ^ ^F  ^ 

= Y^  (wp  - ur  + g 4>)  + E + E 

■^1  ■ <^xz  ^xz’  P + <^Z 

= T^  (wp  - ur  + g ♦)  + Z + I 

- <^xz  + ^xz>  P + <^z 
= Y^  (wp  - ur  + g 4>)  + I ^ 


(6-E) 


(6-F) 


(6-G) 
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(10-B) 


M ^ M ^ 
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^ 4 + p + JiR  5 


M TT 

= uR 
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(13-d) 


MM  M T M 

uR  • ^ uR  b • uR  R • ^ uR  v- 
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= uR 
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Y = M 
^2  uF 


uR  R 


(21) 


(22) 


2 . 3 Vehicle  Attitude  and  Position 

The  Euler  angles  and  X,  Y,  Z coordinates  in  fixed  space  of 
the  sprung  mass  are  computed  by  the  following  equations: 


♦ = Jjr 

O 

(p  + re) 

dt  + cl)(o) 

(23) 

CD 

II 

oS«^ 

(q  - rcl)) 

dt  + 6 (o) 

(24) 

o 

(r  + q4)) 

dt  + 'l'(o) 

(25) 

o 

(u  COS  'i' 

- V SIN  '!')  dt  + X(o) 

(26) 

Y = ^ 

f 

o 

(u  SIN  '1' 

+ V COS  'F)  dt  + Y(o) 

(27) 

^ =/ 
o 

(-U0  + V(j> 

+ w)  dt  + Z (o) 

(28) 
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2 . 4 Suspension  Force 

The  suspension  force  includes  the  following  effects;  weight 
component;  coulomb  friction;  spring  force;  shock  absorber  viscous 
damping;  auxiliary  roll  stiffness;  antipitch  and  antiroll  forces. 

2.4.1  Solid  Front  Axle 


The  suspension  force  effective  at  the  front  spring  loca- 
tion can  be  expressed  as: 


^i  ^sWF  “ ^IFi  “ ^2Fi  “ ^3Fi 


+ ^4Fi  ^APFi  ^ARFi 


(29-A) 


with  i = 1 , 2 


where  the  individual  contributions  are  as  follows ; 


Static  component  of  the  sprung  mass  weight 


F 


- ^ M 

sWF  2 (a  + b)  ^s*^ 


(30-A) 


Coulomb  friction 


(31-A) 


Suspension  force  due  to  spring  deflection  and  suspension  bump 
stops  impact  is: 
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(33-a) 


where  ^ digital  function  which  is  the  difference 
between  the  linear  analog  value  and  the  actual  front  spring 
characteristic . 

The  suspension  deflection  measured  at  the  spring  location 
from  the  position  of  static  equilibrium  at  no-load  condition  is 


^Si  ^i  ^FIN 

Viscous  damping  force 


^3Fi  ~ ^F1  ^i  ^^F2  " ^Fl^  ^FC 


^FC  ^ ^i  < 0 


for  0 < Cpg 


(35-A) 


Suspension  force  due  to  auxiliary  roll  stiffness 


F 


4Fi 


T 

SF 


(36-A) 
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Antipitch  force 


APFi  = 


^F1 


q + Pp2 


F . 
xui 


(37-A) 


Antiroll  force 


^ARFi  ^^FO 


+ R 


FI 


2 ^i 


F 

yui 


(38-A) 


For  these  expressions,  the  suspension  deflections  relative 
to  the  vehicle  from  the  position  of  static  equilibrium,  measured 
at  the  right  (i=1)  and  left  (i=2)  spring  location  of  the  front 
axle,  respectively,  are  evaluated  as; 


(-1)^ 


(39-A) 


(-1) 


i 


(40-A) 


while  the  suspension  deflection  of  the  center  of  the  front  wheel 
of  the  front  axle  is 


q = 6f  - 


(41-A) 


or 


C • = C ■ + 


(-1)^ 


(42-A) 


2^ 
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2.4.2.  Solid  Rear  Axle 

For  the  rear  suspension,  the  suspension  force  effective 
at  the  rear  spring  location  can  be  written  as ; 


^i  ^sWR  ■ ^iRi  ■ ^2Ri  ■ ^3Ri 

4-  F + F + P 

4Ri  APRi  ARRi 

with  i = 3,  4 

where  the  individual  contributions  are  as  follows: 
Static  component  of  the  sprung  mass  weight 


(29-B) 


''sWR  - ^ (30-B) 

2 (a  + b) 

Coulomb  friction 


^IRi  ' '^Ri  (31-B) 

Suspension  force  due  to  spring  deflection  and  suspension  bump  stop 
stop  impact  is: 


^2Ri  ^Ri  ^i  ^BSi 


(32-B) 


and 


^BSi  ^^^Si^ 


(33-B) 


where  ^ digital  function  which  is  the  difference 

between  the  linear  analog  value  and  the  actual  rear  spring 
characteristics . 


76 


THE  JOHNS  HOPKINS  UNIVERSITY 

APPLIED  PHYSICS  LABORATORY 

LAUREL.  Maryland 


The  suspension  deflection  measured  at  the  spring  location 
from  the  position  of  static  equilibrium  at  no-load  condition  is 


«Si  = 

^i  ^RIN 

(34-B) 

Viscous  damping 

force 

^3Ri  " ^R1 

^ '=R2 

■"  ^R1  ^ ^'rC 

for 

• • 

c . < c 
^i  ^RC 

^R2 

• 

for 

• • 

c < c . 

^RC  = ^i 

< 0 

^R3 

« 

for 

vll 

■H 

vll 

o 

^RE 

cc; 

u 

II 

^R3^  ^RE 

for 

• • 

1,  . > C 
^i  ^RE 

(35-B) 

Suspension  force  due  to  auxiliary  roll  stiffness 


^4Ri  = 


i ^r'^R 


SR 


(36-B) 


Antipitch  force 


.2 


^APRi  ^^RO  ^R1  ^i  ^R2  ^i  ^ ^xui 


(37-B) 


Antiroll  force 


.2 


^ARRi  ^^RO  ^R1  ^i  ^R2  ^i  ^ ^yui 


(38-B) 


For  these  expressions,  the  suspension  deflections  relative 
to  the  vehicle  from  the  position  of  static  equilibrium,  measured 
at  the  right  (i  = 3)  and  left  (i  = 4)  spring  location  of  the  rear 
axle,  respectively,  are  evaluated  as: 
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¥*r 


(39-B) 


* • i T * 

?i  = - (-1)  _|R  *R 


(40-B) 


while  the  suspension  deflection  of  the  center  of  the  rear  wheel 
of  the  rear  axle  is 


q = 6r  - (-1)' 


(41-B) 


or 


= ?i  + (-1)^ 


- T ' 
SR  R 


<P 


R 


(42-B) 


2.4.3  Independent  Front  Suspension 

The  suspension  forces  S^  are  effective  at  wheel  i 


C—  T?  mm  TP  — F 

i sWF  iFi  2Fi  3Fi 


+ ^4Fi  ^APFi  ^ARFi 


(29-C) 


with  i = 1,2 


The  static  component  of  the  sprung  mass  weight  at  the 
front  wheel  is 


F = _ . . M 

sWF  2 (a+b)  sg 


(30-C) 
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by 


The  Coulomb  friction  force  effective  at  wheel  i is  given 


iFi 


= sgn 


(31-C) 


The  suspension  force  produced  by  deflection  of  the 

spring  is 


F^_ . = K_ . 6 . + F-„ . 
2Fi  Fi  1 BSi 


F . = F ( 6 . ) 
BSi  ^ Si^ 


(32-C) 

(33-C) 


where  F(6g^)  is  a digital  function  which  is  the  difference 
between  the  analog  value  and  the  actual  spring  characteristic. 


denotes  the  suspension  deflection  from  the  position 
of  static^equilibrium  at  no-load  condition  as 


Si  1 FIN 


(34-C) 


The  viscous  damping  force  is  expressed  as 


^3Fi  ^F1  *^i  ^^2  " ^FI^'^FC 


for  6.  < 


= 6 . 
F2  1 


for  < 6^  < 0 
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Cf3 


for  0 < 6^  < 


- <^4  - S3>^FE 


• • 


for  6.  > 


(35-C) 


where  C„,  denotes  the  slope  of  the  segments  (k=1  to  4) , and 

• 

and  are  the  abscissa  of  the  break  points  for  compression 

and  extension,  respectively. 


The  suspension  force  due  to  auxiliary  roll  stiffness 


IS 


^Fi  = 


i «F  - «2> 


(36-C) 


The  antipitch  force  at  wheel  i is  represented  by  the  expres- 


sion 


^APFi  ^F1  *^i  ^F2  "^i  ^ ^xui  (37-C) 


where  is  the  component  of  the  tire  force  on  wheel  i in  the 

x-direction  in  the  vehicle  axis  system. 


The  antiroll  force  at  wheel  i is  expressed  as 

^ARFi  ^ ^Fl  '^i  ^f2  *^i  ^ ^yui  (38-C) 

where  F . is  the  component  of  the  tire  force  on  wheel  i along 
the  vehicle  y-axis. 
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2.4.4  Independent  Rear  Suspension 

Similarly,  the  suspension  force  effective  at  wheel  i 
can  be  expressed  as 


^i  ^sWR  ” ^iRi  “ ^2Ri  “ ^3Ri 
^4Ri  ^APRi  ^ARRi 

with  i = 3,4 

where  the  individual  contributions  are  as  follows : 
Static  component  of  the  spring  mass  weight 

^sWR  ~ 2 (a  + b)  ^s*^ 


(29-D) 


(30-D) 


Coulomb  friction 

^IRi  = =Ri  (31-D) 

Suspension  force  due  to  spring  deflection  and  suspension  bumb 
stop  impact  is : 


2Ri 


= ^Ri  ^i  ^ ^BSi 


(32-D) 
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and 


BSi 


= F(6g.) 


where  F(6  .)  is  a digital  function  which  is  the  difference 
between  thl^linear  analog  value  and  the  actual  rear  spring 
characteristic . 


and 


■^Si  = '^i  *RIN 


Viscous  damping 

force 

^3Ri  ^ ^R1 

6.  + 
1 

^‘^R2 

^Rl^ 

'■rc 

for 

6.  < 
1 

^■rc 

^R2 

• 

6 . 
1 

for 

^‘rc 

< 6. 
= 1 

II 

n 

U) 

« 

6 . 
1 

for 

0 < 

(S.  < 
1 = 

^R4 

• 

6.  - 
1 

<^4 

^R3^ 

*RB 

for 

6.  > 
1 

«RE 

Suspension  force  due  to  auxiliary  roll  stiffness 


^Ri  = 


i \ <^3  - 


■R 


Antipitch  force 
F 


APRi  ^^RO  ^R1  ^R2  '^i  ^ ^xui 


Antiroll  force 


^ARRi  ^^’RO  '''  ^R1  *^i  ^R2  *^1  ^ ^yui 


(33-D) 


(34-D) 


(35-D) 


(36-D) 


(37-D) 


(38-D) 
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2 . 5 Wheel  Orientation 

The  orientations  of  the  wheels  with  respect  to  the  sprung 
mass  are  defined  by  the  following  equations: 

Camber  angles  at  wheel  i 


= 4>f 


(43-A) 


((>2  = 4'p  + A<()2 


♦ 3 = ♦p 


♦ 4 = 


(44-A) 

(45-B) 

(46-B) 


T,  C.  + A4).  sgn  F_. 

i=0 


(43-C) 


^2  = ^iF  ^S2  + ^^2  ^S2 

1=0 


(44-C) 


♦3  = ""iR  ^S3 
1=0 


(45-D) 


♦4  = =iR  «s4 
1=0 


(46-D) 
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Steer  angles  at  wheel  i 


= 

*^FW1  “ ^FS  ^F  ^'^1 

(47-A) 

T2  = 

*^FW2  ■ ^FS  ^F  ^'^2 

(48-A) 

^3  = 

^RS  ‘^R  ^SR  ^ZR3 

(49-B) 

'i'  - 

^4  - 

^RS  + Kgp 

(50-B) 

“^FWI 

+ Z D,p  + Af, 

1=0 

(47-C) 

5 

^FW2 

- «S2  ^ ^^^2 

1=0 

(48-C) 

5 

Z D 
i=o 

iR  '^S3  ^SR  ^ZR3 

(49-D) 

5 

-Z  D 
i=o 

iR  ^S4  ^SR  ^ZR4 

(50-D) 

Caster  angles  of  the  front  wheels 

5 

Z 

EiF  ^ 

(51) 

i=o 


5 

®S2  = ®iF  «S2  + ^®2 

1=0 
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2 . 6 Resultant  Forces  and  Moments 


The  resultant  tire,  suspension,  and  aerodynamic 

forces 

and  moments  required  for  the  equations  of  motion  are 
Tire  forces: 

given  below 

F . = F„.  0 + F^.  COS  'i'.  - F^.  SIN  'i' . 

xui  Ri  Cl  1 Si  1 

(53) 

F . = -F„.  (J)  + F_.  SIN  'F.  + F^.  COS  'F . 

yui  Ri  ^ Cl  1 Si  1 

(54) 

F . = -F_. 
zui  Ri 

(55) 

4 

Z F = E F . 

XU  . . XUl 

1=1 

(56) 

4 

E F = E F . 

yu  yui 

(57) 

4 

E F = E F . 

zu  . - ZUl 

1=1 

Aerodynamic  forces: 

Cross  Wind  Disturbance 

(58) 

L^.  = u - Sin  i|) 

(59) 

V = V - V cos  Ip 

r yw 

(60) 

V7  = w 

r 

(61) 

Z 

p = (p  - (jo  cos  + co„  9) 

^ ^ xw  ^ zw  ^ 

r 

(62) 
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_ £ 

q = (q  + 00  sin  - od  di) (63) 

^ ^ xw  ^ zw^  u 

r 


r = (r  - 00  ) — 

^ zw  u 

r 

(64) 

,,  1 7~~  T~  7 

= t/u  + V + w 

CW  If  r r r 

(65) 

a = tan  ^ 

(66) 

\^r/ 

T = Sin”'' 

\ cw/ 

(67) 

I ''cw 

(68) 

(69) 

E fys  = <=Y  ^ P ^ Sr  ‘^a  S 

(70) 

^ Pzs  = <=z  '=z  “ ■"  '=z  5)  Sj 

a q 

(71) 

Tire  moments : 

^ V = <S2  - Si>  !|f  + ( - S3)  ^ 


^^yul  ‘‘‘  ^yu2^ 

(2f  + S> 

^^yu3  ^ ^yu4^ 

'^R  S> 

(72-E) 
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Z = (S^  + S2>a  - (S3  + Sj,)b 


+ ^xu2<"f  * ^F-  ^2) 


^ ^XU3<^R  * \ ^ 


* ^xuk'^r  ■"  '^r  • — ♦r  ■" 


(73-E) 


Z N,  = (S^  - 
(f)U  2 

T 

F 

“2 

+ (s^ 

T 

- S ) 

^3'  2 

^yul 

(Zf  + 

+ 

^yu2 

(Zf  + «2 

+ 

- «FC> 

2 

- <*’yu3 

^ V^’ 

<^R 

6„)  + Z 
R'  XFi 

(72-F) 

Z N„  = 
6u 

(S^  + 

®2 

) a 

(S3  + 

®4 

)b 

+ 

^xul 

'^F 

+ 

+ h^) 

+ 

^xu2  <"f  ^ «2  ^ "2) 

+ 

^xu3 

'^R 

+ 

-e- 

+ h3> 

+ 

^xu4 

<^R 

+ 

^R 

2 

-e- 

+ h^) 

(73-F) 
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^ = ‘^2  - Sl>  ^ ^ <®4  - ®3>  ^ 


6u 


-F  1 

yul 

(Zf  + 

6i+hi- 

«FC> 

-F 

^yu2 

(^F 

*^2  '*'  ^2  ” 

«FC> 

“^yu3 

("r 

63+hs- 

«RC> 

^yu4 

("r 

*^4  + ^4  “ 

«RC> 

^Si  “ 

XFi  "'‘i 

4 

T.  M 

=3  ^XRi 

(72-G) 

= (S^ 

+ S2)a 

- (S3  + 

S4>b 

+ F , 
xul 

(^F 

6^  + h^) 

+ F T 

xu2 

(Zf  + 

«2  + hj) 

+ F ^ 
xu3 

("r 

63  + hj) 

+ F 

xu4 

<"r  + 

«4  + h^) 

(73-G) 

^ V = ‘^1  - =2) 


SF 


+ F 


+ h,4' 


zul I 2 1 Fi 


2^F 


,T 


-F 


yul(^*F  ^ h,'  - F 


yu2  (^2  ^ '’2)'^  i=i  (7‘t-A) 
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^ ^^yul  " ^^yu3  ^yu4^^ 


^'^xu2-^xu1>  T ^ <^xu4  - ^xu3>  ^ 


• j, • i, 


(75) 


" %R  = <®3  - ®4>  ^ + ^ZU3(^  - >’30  - ^ZU4(^  ^ N*J 


T \ / T 

^yusil”  ^3)  ~ ^yu4  ~ ‘^R  ■*■  ^4 


^ i^3 


(76-B) 


where  M„„.,  M^_ . and  . are  the  front  and  rear  wheel 

ZFi  ZRi  XFi  XRi 

aligning  torques  and  overturning  moments,  respectively. 


Aerodynamic  moments : 


^CG  ^ ” 2 


(77) 


C = — — C 

L £ L 


(o)  p 

£ Y 


(78) 


p-  = _V  r 2£  r + (o)  r 

£ ^X 


(79) 
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'N 


= — c + c 

I S I Y 


S = (C;  + C„  P + Co  r)  i 


4)S 


z N,_  = (C,-;  + ot  + q)  q^s^  I 


es  ' M 


m 


a 


m 


s N.„.  = (C  + c„  p + i)  q„Sf  4 


ijjS 


'N  n 


(80) 

(81) 

(82) 

(83) 


2 . 7 Radial  Tire  Force  and  Rolling  Radius 

The  radial  tire  forces  and  the  rolling  radii  of  the 
tires  are  computed  by  the  following  equations; 


. = K^.  (R  - h. ) 
Ri  Ti  w 1 


(84) 


where 


h.  = - Z. ; i = 1,  2,  3,4  h.  < R^ 


h.  = R 

1 w 


h.  > R 
1 w 


(85) 


Z.  = 


Z - a6  + Zj,  + 6p  + (<J)  + c})^) 


f'  "T  ^si 


(86-A) 


^2  - 2 - a0  + Zp  + - (({)  + (f)p)  ^S2 


(87-A) 
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T 

Z3  = Z + b 6 + + (c|,  + + Zg3  (88-B) 


= z + b e + ^ (89-b) 


Z^  = Z - a 6 + cf)  + Zp  + 6^  + Zg^  (86-C) 

T 

Z2  = Z-  a0-^(|)  + Zp  + 62  + Z^^  (87-C) 

T 

Z3  = Z + b 6 + 2“  4>  + Zp^  + 63  + 2g3  (88-D) 


Z^-Z  + be-—  (|)  + Zp+6^  + Zg^ 


and  the  initial  tire  loading  and  orientation  are  as  shown  below: 


(0) 


.h 


(0)  - ‘^3(0) 


Z - Z 

+ 

1 

•n 

1 

(90) 


a + b 


1(0)  ^'2(0)  "V  ■'■(a+bj^S 


h.  = h^  = R 


(91) 
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h. = h, 


R -- 


■3(0)  4(0)  w r"UR  ' la+b/"'S 


Kr  + (sfb) 


M, 


(92) 


(0) 


b 

h-  / o \ + 

+ a 

1 (0)  F 

3(0)  R 

a + b 


^EIA£ 


(93) 


Wheel  lift-off  indication  is  provided  by 

=(R-h.)  i=1,2,3,4 

MXi  w 1 


(94) 


where 


^MXi  ^ ° 


^MXi  - ° 


wheel  i in  contact  with  tire-terrain  patch 


wheel  i not  in  contact  with  tire-terrain 
patch 


2 . 8 Tire  Circumferential  Force 

The  circumferential  tire  forces  for  both  driving  and 
braking  are  defined  below; 


(95) 
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2.9  Circumferential  Friction  Coefficient 


The  circumferential  friction  coefficient  equations 
are  shown  below: 

Ml  = m2^  (SLIP)^  + Mq^  for  (SLIP)^  > SI^ 


= m^^  (SLIP)^  for  (SLIP)^  < SI^  (96) 

Computation  of  the  slopes  for  the  yT  curve  is  performed 
by  the  following  equations: 

front  wheels: 


A 

V SF 

^SF 

1 COS  (3j_)  1 

i = 1 ,2  (97) 

PpF 

^BFI 

^ ^BF2  ^Ri 

(98) 

SN. 

1 

= (SN) 

Sq/(SN)t 

(99) 

m 


1 1 


for  m. . < 


SF 


li'ST—  SNi  (100) 
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2i 


SF  " ^PF 


(1.0  - 57.3  B |3  3". 

c ' 1 


(1.0  - SI . ) 

1 


SN.  for  ^ 


SF 


SN. 

1 


= 0.0 


for  SN^  (101) 


1i 


Oi 


ygF  SNi 


^1i  ” ^2i 


(102) 

(103) 


Rear  wheels: 

^SR  ^SR  I (3j_)  I 


^PR  ^BRl  ^BR2  ^Ri 


SN^  = (SN)gQ/(SN) 


i = 3,4 


(104) 

(105) 

(106) 


iriii 


= (^)  (1.0  - 57.3  B^  |3j_  + 3r|)  SN^  for 


H cp 

’^li  - sT~ 


SR 


SI . 
1 


SN. 

1 


for  m. . < 


SR 


SN 


1i  SI.  ■■ 1 
1 


(107) 


m 


2i 


^'SR  - ^PR  ^ 


(1.0  - SI^) 


SN.  for  ^ ^ 


SR 


SN. 

1 


= 0.0 


for  m. . < 


SR 


1i  SI 


SN. 

1 


(108) 
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(109) 

^*0i  = hi  - “2i 

(110) 

2.10  Wheel  Slip 

Computation  of  circumferential  wheel  slip  is  performed 
by  the  following  equations: 


where 


(SLIP) . = 1 

for 

> 1 

1 

1 

= h 

for 

-1 

£ 

= -1 

for 

c . 

< -1 

1 

a) . 

h. 

f - 1 _ 

1 

1 

U-.  COS  + v_.  SIN  4'. 
Gi  1 Gi  1 


(111) 


(112) 


2.11  Wheel  Rotational  Equations 

The  wheel  rotational  equations  required  to  compute 
wheel  slip  are  presented  below: 


'"WF  + I "dF  ^ 4 ^DF 


(113) 


h.  + TO. 
Cl  1 1 
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where 


For 


<^WF  ^ I ^DF  ^"f^>  “2  ^ 'r  ^DF 


^C2  ^2  *^^2 


(114) 


■*'  4 ^DR  ^^R  ^ ^3  ^DR  ^^R  ^^4 


^C3  ^3  "^^3 


(115) 


^^WR  4 ^DR  ^^R  ^ ^^4  ^4  ^DR  ^^R  ^^^3 


"^C4  ^4  '^'^4 


(116) 


to.  = to.(0)  + / to.  dt 

1 1 1 
o 


(117) 


(SLIP) . = 0 at  t = 0 
1 


w^(0)  = 


Uj3^(0)  COS  4'^(0)  + (0)  SIN  'l'^(O) 

h^(0) 


(118) 


TQi  = (1  - Xp)  (^)tQ^p  + Xg,  TQg, 


(119) 


AR 

TQ2  = (1  - X^)  1— /TQ^f  + Xg2  TQ32 


(120) 
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^^3  ^0(2)  ^B3 

S ™DR  ^B4  ^B4 

2.12  Brake  and  Drive  Torques 

The  drive  torques  generated  to  maintain  a constant 
velocity  are  computed  by: 

= ^TQ  ^ 

^ MAX 

= TQ  , Otherwise  (123) 

MAX 

where  is  the  desired  velocity. 

Values  of  1000  lb  in. /in. /sec.  and  6000  lb  in.  were 

assigned  to  K and  TQ  respectively.  When  braking  is 

^MAX 

investigated,  the  drive  torque  is  zero  and  the  brake  torque 
magnitudes  are  determined  from  input  data  functions. 


^2b1 

= ^Cb2 

= FF  (PFL)  , 

lb-in. 

(124) 

^B3 

= ™B4 

= FR(PFL) , 

lb-in. 

(125) 

where  PFL  is  an  input  value  for  brake-line  pressure. 


(121) 

(122) 
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2.13  Tire  Side  Force 

The  nonlinear  tire  side  forces  are  computed  using  the 
following  equations: 


^Si  ^Ri  I l^yi  ^^^i^ 


- [I^yi  g^^i) 


- y 


SF 


^Si  ^Ri  I ^yi  ^ ^^i^ 


i = 1 ,2 

SIN  (B^) I SN^]  F^j  SGN  g(F^) 

(126) 

i = 3,4 


- [|Pyi  g(3^)  I - PgR  I SIN  (3.)  I SN^]  F^j  SGN  g(3.) 

(127) 


2.14 


Tire  Side  Force  Friction  Coefficient 

The  side  force  coefficient  of  friction  is  defined  below: 

(128) 

1 ,2 


y . = (B.„  F^.  + C . + B.,„  + B,,„  F„ . ) SN . 

^yi  IF  Ri  2F  VI  3F  4F  Ri  i 


1 = 


yi 


^^1R  ^Ri  ^2R  ^vi  ®3R  '''  ®4R  ^Ri 


SN. 

1 


(129) 


i = 3,4 


and 


(130) 
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2.15  Velocities  of  the  Tire  Contact  Points 

The  velocities  of  the  tire  contact  points  along  the 
vehicle  axes  are  computed  by  the  following  equations : 

T 

Ui  - u - ■^r  + Zp  q (131) 

T 

^2  = u + ~r  + Zp  q (132) 

T_ 

U3  = u - -j^r  + Zj^  q (133) 

= u + j-r  + q (134) 

• 

v^  = V + ar  - (Zp  + h^)p  - h^  (135-A) 

V2  = V + ar  “ + h2)p  - h2  4>p  (136-A) 

• 

v^  = V - br  - {z^  + h^)?  - h^  (137-B) 

v^  = V ” br  - (Zj^  + h^)p  “ h^  (138-B) 

v^  = V + ar  - (Zp  + h^)p  (135-C) 

V2  = V + ar  - (Zp  + h2)p  (136-C) 
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= V - br  - (z^  + 

= V - br  - (Zj^  + h^)p 


F 

= w - aq  + + (p  + (j)p)  ^ 


. Tp 

W2  = w - aq  + 6p  - (p  + Y~ 

T 

= w + bq  + + (p  + ^ 

• '^R 

= w + bq  + 6p,  - (p  + c^j^)  — 

*^F 

= w - aq  + P + <5^ 

^F 

W2  = w - aq  - — p + 62 
W2=w+bq+62+  j-  p 

■^R 

= w + bq  + 6^  - p 


(137-D) 

(138-D) 

(139-A) 

(140-A) 

(141-B) 

(142-B) 

(139-C) 

(140-C) 

(141-D) 

(142-D) 


The  wheel  velocities  in  the  ground  plane  are  obtained  by; 


. = u . + 6w . 
Gi  1 1 


. = V . - d)W . 

Gi  1^1 


(143) 

(144) 
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2.16  Combined  Slip  Angle  and  Camber  Shaping  Function 

The  dimensionless  side  force  shaping  function  for  slip 
angle  and  camber  is  as  follows; 


g(Si)  = Fi  - ^ IBJ  + 27  if  l^il  < 3 


(145) 


if  |6j_|  > 3 


i = 1,2, 3, 4 


For 


i = 1 ,2 


^i  = 


^1F  ^Ri  ^^Ri  ~ -^2F^  ~ ^oF  ^2F 
^2F  ^yi  ^Ri 


(s^  + ep 


(146) 


= ^2F  ^3F  ^^4F  ~ ^Ri^  ^Ri  ^CGi 

^4fI^1F  ^Ri  ^^Ri  " “^2F^  " -^oF  ^2F 


If  F 


Ri 


A^TF  ^2F' 


i = 1 ,2 


(147) 


^1F  ^2F  ^^TF  ^^^TF 


y • . 

yi  Rl 


(3.  t 


3p 


(148) 


3;  = ^2F  ^3F  ^Sf  ^^4F  ' ^^TF  ^2F^  ^CGi 

^4pl^lF  ^2F  ^^TF  ^^^TF  “ " -^ofI 
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For  Fj^.  < A^JJ, 


i = 3,4 


= 


^1R  ^Ri  ~ ~ •^oR  ^2R 

^2R  ^yi  ^Ri 


(3i  3r) 


(150) 


= 


^2R  ^3R  ^^4R  - ^Rj)  ^Ri  ^CGi 
^4rI‘^1R  ^Ri  ^^Ri  “ '^2R^  ” "^oR  ^2R 


(151) 


If 


i = 3,4 


= 


= 


^1R  ^2R  ^^TR  ^^^TR  ~ ^ ~ ■^qR 

^yi  ^Ri 


(3^  + 3p 


^2R  ^3R  ^^TR  ^^4R  ~ ‘^^TR  ^2R^  *^CGi 
^4rI^1R  ^2R  ^^TR  ^^^TR  " 


(152) 


(153) 


2.17  Wheel  Slip  Angle 


3 . = tan 

1 


^Gi 

^Gi 


- '1' . sgn  u 


Gi 


(154) 
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2.18  Wheel  Camber  with  Respect  to  the  Road 

The  camber  angles  of  the  wheels  measured  with  respect 
to  the  road  are  given  by: 


CGi  ^'*’1 

i * 1,2 

(155-A) 

CGi  ^ ° 

i = 3,4 

(156-B) 

CGi  = ® SIN 

COS 

Yi  + *i  + Fg. 

i = 1 ,2 

(155-C) 

CGi  = ® SIN 

¥.  + 4 

1 ^ 

cos 

Yi  + *i  + Fg. 

i = 3,4 

(156-D) 

2.19  Wheel  Slip  Shaping  Function 

The  dimensionless  side  force  shaping  function  for 
circumferential  slip  is  empirically  derived. 


F . 

1 


(SLIP) 


= input  table 


.1 

F. 

1 

(SLTP)^ 

0.00 

00.0 

0.01 

05.0 

0.03 

10.0 

0.07 

15.0 

0.17 

20.0 

0.35 

30.0 

0.54 

40.0 

0.81 

60.0 

0.93 

80.0 

1 .00 

100.0 

(%) 


(157) 
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2.20  Tire  Moraents 

The  tire-road  reaction  moments  acting  about  the  kingpins 
are  computed  by  the  following  equations: 


= F . 
Ti  xui 


PT.  SIN  'F.  - . COS  'F . 

1 1 SAi  1 


+ h.  (c|) . COS  4'.  - . ) 

1 1 ^Si 


+ F 


yui 


-PT.  KK.  COS  ’F. 
11  1 


- y^^.  SIN  'F.  + h.  ((f).  SIN  »F . - 0^.) 

-^SAi  1 1 ^1  1 Si 


+ F 


zui 


- PT^  (cf)g^  COS  'F^  + SIN  'F.j) 


+ (e_.  COS  'F.  - (j)^.  SIN  'F.) 

SAi  Si  1 ^Si  1 


+ h.  ((f)^.  (f).  SIN  'F.  - 6^.  (f).  COS  'F.) 
1 ^Si  ^1  1 Si  ^1  1 


i = 1,2 


*^S1  ^SAl 


(158) 

(159) 


‘*>S2  = ^^SA2 


(160) 


The  tire  aligning  torques  are  defined  as 


MzFi  = |F^,|)  F^,  + A_^  F^.  (|(l)p^  |) 


'1  "Ri  ' ^^2  '^Si'  Si  f3 


1/2 

i = 1 ,2 


(161) 


M 


. = (A  F„.  + A |F  . |)  F . + A F . (Upr-il) 
ZRi  ^1  Ri  R2  ' Si  ' Si  R3  Ri  Obi 

i = 3,4 


1/2 


(162) 
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The  tire  overturning  moments  are  defined  as 


^XFi  ^FO  ^F2l‘^CGil^  ^Si  ^Ri  *^F3  ‘^CGi  ^Ri 


i = 1 ,2 

^XRi  ^ °R0  '''  ^^R1  ^ °R2l^CGil^  ^Si  ^Ri  °R3  ‘^CGi  ^Ri 

i = 3,4 

2.21  Steering  Equations 

The  steering  equations  are  presented  below: 


(r+6  .)!  =-H.  6 .+M.-M  .+M 

''  FWi^  FW  i FWi  Ti  SSi  ZFi 


i = 1 ,2 


T M ..  M 

M V = -c  -c  V + -^  + SSI  ""SS2 
CR  ^CR  '^pp  Ypp  ^ ^ + 


'FCR  ''CR  ^CR  a a^  , a^ . 

p LI  L2 


Where  = f 

conditions : 


^G  l^SC  [|"'^SW  ” ^G  a 


CR 


^SP  sgn  1 6 - N 


, , sw  G a 

2 \ \ p 


); 


if  - N 


CR 


SW  G a 


SP 


otherwise  T = 0 
P 


(163) 


(164) 


(165) 


(166) 


(167) 
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^SSi  ^SLi 


‘CR 


■^FWi  a^^)‘  2^  a^. 


if 


CR 

*FWi  ■ . 

Li 


e . 
2^ 


Otherwise  M__.  = 0 
SSi 


(168) 


2.22  Longitudinal  and  Lateral  Accelerations 

The  longitudinal  and  lateral  accelerations  of  the  sprung 
mass  are  computed  by  the  following  equations: 


(u  - vr  + wq)/g 

(169) 

• 

(v  + ru  - wp)/g 

(170) 

2.23  Dual  Tires  on  Solid  Rear  Axle 
2.23.1  Equations  of  Motion 


"uR  w + M^r  b q + M^r  «r  = Mur  (uq  - vp  + g)  (S-H) 


-2  (F^3  + + S3  + S, 


where 


^^R3  ^R4^  ^T3  ^^w  ^3DE^ 


+ ^4  ^ ^DE^ 


(171) 
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2.23.2  Suspension  Forces 


^APRi  ^R1  ^R2  ^ ^^xui  ^ ^xu(i+2)^ 


1 = 


ARRi  ‘'^RO  + ®R1  + \2  *^yui  ^yu(i+2)> 


1 = 


4 = «R 


1 = 


2.23.3  Wheel  Orientation 


'^3  ^RS  ^R  ^SR  ^ZR3 


'^4  ^RS  ^R  ^SR  ^ZR4 


2.23.4  Resultant  Forces  and  Moments 


Tire  forces : 


(p  + F^.^^  SIN  'i'.  + F . COS  'i'. 
yui  iRID  ^ CiID  1 SilD  i 


1 = 


^ (j>  + F SIN  'i',.  oY  + F 

yui  iROD  ^ CiOD  (i~2)  < 


SiOD 


COS  '1' 


1 = 


(172) 
3,4 

(173) 
3,4 

(174) 
3,4 

(175) 

(176) 


(177) 
3,4 

(178) 
(i“2) 

5,6 
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F . = 0 + F^.^^  COS  - F^.^^  SIN  '1' . 

xui  iRID  CiID  1 SiID  1 


^xui  = ^iROD  ® ^ ^CiOD  ^i-2)  -^SiOD 


Aligning  Moments : 


ZiRID  ■ ^ iRID 


M„  . 


F. + 


^2  I^SilD^^  ^Si 


SiID 


^ZiROD  ^iROD  ^2  '^SiOD'^  ^SiOD 


^ZRi  ^ZiRID  ^ ^Z(i+2)ROD 


M = M = M 

ZRi  ZlRID  Z(l+2)ROD 


Overturning  Moments : 


^XiRID  ^SilD  ^iRID 


^XiROD  ^SiOD  ^iRID 


(179) 
= 3,4 

2)  (180) 

= 5,6 

(181 ) 
= 3,4 

(182) 
= 5,6 

(183) 

= 3 

(184) 

= 4 

(185) 
= 3,4 

(186) 
= 5,6 
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M . = M = M 

XRi  ^^XiRID  X(i+2)ROD 


M . = M + M 

XRi  XiRID  ^X(i+2)ROD 


Suspension  and  Tire  Moments 


EN,  = (F  + F «)  a 
ipu  yul  yu2 


^^yu3  ^yu4  ^yu5  ^yu6^  ^ 


^^xu2  " ^xul^  2 


IR 


xu4  xu3  2 


*^xu6  " *’xu5*  ~T~ 


= (®2  - ^ <®4  - ^3>  ^ 


F . (z_  + 6.  + h-  - H„) 
yul  F 1 1 FC 


^yu2  ^^F  *^2  ^2  " ^FC^ 


^V3  ^ ^yu4  ^ ^yu5  ^ ^ 


+ E M, 
i=1 


XFi 


(187) 

= 3 

(188) 

= 4 


(189) 


(190-H) 
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ZNq  = (S-,  + S^)  a - (S^  + S,,)  b 

0u  I ^ J 4 


^xul  '^1  ^ ^xu2  ^2^ 


IR 


^xu3  ■*■  “^R  " ^3ID  2 '^R^ 


+ F ,,  (z„  + 6^ 

xu4  R R 


- Z 


IR 


4ID  2 ^R^ 


+ F _ (z„  + 6^ 

xu5  R R 


r?  I j,  S 

^50D  2 ^R^ 


+ F ^ (z„  + - Z 


OR 


xu6  R R 60D  2 ^R 


^^3  “ ^4^  2 '''  ^R3  ^'^OIR  ^3DE  ‘^R^  ^ 


+ Fj^^  [2  - Z^^g  (j)^)  ] - F^^2  ^“^3ID  2 


IR 


F (-Z 


IR 


yu4  ^ 4ID  2 ^R 


4>J 


T 


OR 


^yu5  ^“^50D  2 ^R^ 


^yu6  ^"^60D 


OR 


2 ^ '^R^ 


+ Z M 
i=3 


XRi 


(191-H) 


(192) 
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2.23.5  Radial  Tire  Force  and  Rolling  Radius 

^3RID  “ *^T3  ^3ID* 

= 0 

^4RID  “ *^14  ^4Id' 

= 0 

^’SROD  ~ *^T3  ^50d' 

= 0 

^6R0D  “ ®^T4  ^60D* 

= 0 


^ "3ID>  = 


"'w  + "3ID>  ' 


+ ^4ID>  = 


<®W  ^ "50D>  = 


+ "sod*  = 


^ ^60d)  = 


^ "60D>  ■ 


T = 
OIR 

^lOR  = 

^3DE 

^4DE 


T + T 
IR  OR 


T - T 
IR  OR 


z + be  + + 6j,  + Tqjj, 

z + be  + Zr  + 6r  - Tqjr 


(♦  + <t'j^) 

(c|)  + 


0 

0 

(193) 

0 

0 

(194) 

0 

0 

(195) 

0 

0 

(196) 

(197) 

(198) 

(199) 

(200) 
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^3ID 

^4ID 

^50D 

^60D 


7 4-  T 

3DE  lOR 
^4DE  ” "^lOR 

7 — T 

3DE  lOR 
^4DE  "^lOR 


(<t>  + 4>j^) 
(4>  + 

(4>  + 4>j^) 
(4)  + 4>r) 


(201) 

(202) 

(203) 

(204) 


where 


= h„  = R - 


^3(0)  “4(0) 


w ^a+b^ 


(205) 


2.23.6  Tire  Circumferential  Force 


F . 
CilD 


'U  ! F . 
^ilD  iRID 


i = 3,4 

(206) 


F . 
CiOD 


= -u  ! F . 

^iOD  iROD 


i = 5,6 

(207) 


2.23.7  Circumferential  Coefficient  of  Friction 


^ilD 


^1i  ^ilD 


for  S.  ^ SI. 


m., . S . + y _ . 

2i  iID  ^Oi 


for  > SI^  (208) 


i = 3,4 


'^iOD 


^1  (i-2)  ^ilD 


for  S . 1 SI  , . TV 
iID  (i-2) 


= m 


2 (i-2)  ^ilD  ^0(i-2) 


for  S . > SI , . TV 
iID  (i-2) 

(209) 
i = 5,6 
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2.23.8 

Analog 


where 


'^yilD  ^iRID  ^2R  ^vi  ^3R 


^ ^4R  ^iRID  ^ 


(210) 
i = 3 , 4 


'^yiOD  ^®IR  ^iROD  ^2R  ^v(i-2)  ®3R 


^4R  ^iROD  ^ ^^(i-2) 


(211 ) 
i = 5,6 


Wheel  Slip 


(SLIP)^  = 1 
= ?i 


for  ^ > 1 

for  -1  < ^ ^ ^ 1 

for  C . < -1  (212) 

1 


K • = 1 + — 
± u 


1 iDE 


•Gi  ^ ^Gi 


(213) 
i = 3,4 
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Digital : 


^ilD  = 1 


for  £ . > 1 
^ 1 


= 


for  -1  < ^ 


= -1 


for  < -1  (214) 


1 + 


“i  ^ilD 
“GilD  COS  T,  + 


' ..^TN  SIN  f. 
GiID  1 


1 = 


(215) 

3,4 


^iOD  ^ 


for  > ”1 


= 


for  -1  £ r . < 
^1 


= -1 


for 


< -1  (216) 


CO  , . o \ Z . 

r = 1 + (i-2)  lOD 

^i  COS  'i'  , . ON  + V 


GiOD 


/■  ON  ' ' r\T\  SIN  ON 

(i-2)  GiOD  (i-2) 


(217) 


i = 5,6 


^G3ID 

^G4ID  = ^4ID  ^ ®^4ID 
^G50D  ^50D  ®^50D 
^G60D  ^ ^60D  ^^^600 


(218) 

(219) 

(220) 
(221) 
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’^GSID  "^3ID  " 

(222) 

^^6410  "^4ID  “ ^'^4ID 

(223) 

^G50D  " ’^SOD  ■ ^^50D 

(224) 

^G60D  ^ ’^60D  " ^^60D 

(225) 

^3ID  ^ ^3  “ "^lOR  ^ 

(226) 

^4ID  ^4  ■'■  "^lOR  ^ 

(227) 

^50D  ^ ^3  "^lOR  ^ 

(228) 

^60D  ^ ^4  " "^lOR  ^ 

(229) 

^3ID  = V - br  - Zj^p  + (p  + 

(230) 

• 

= V - br  - Zj^p  + (p  + 

(231) 

'^500  = V - br  - Zj^p  + ZgQp  (p  + 

(232) 

'^600  = V - br  - Zj^p  + ZgQp  (p  + ,Jj^) 

(233) 

”3ID  “ ”3  '^lOR 

(234) 

”4ID  “ ”4  “ '^lOR  '*’  *R* 

(235) 

”50D  = «3  - ^lOR  <P  + *r) 

(236) 
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' ”60D  = '^4  '^lOR  <P  *R> 

2.23.9  Wheel  Rotational  Equations 
Analog : 

'^WR  T ^DR  ^R>  “3  + 't  ^DR  ^r’  "4 
= 2(Fc3  Zjde)  + % 

*^WR  4 ^DR  ^®r'  "4  ^DR  ^^R*  “3 

= 2 ^4de^  "^^4 


(237) 


(238) 


(239) 


C3 


■^3  ^R3 


(240) 


C4 


•^4  ^R4 


(241) 


2.23.10  Tire  Side  Force 


^SilD  ^iRID  ^l^yilD  " U^yiiD 


-hgj^  |SIN  (3j_)  I SN^]  F^  } SGN  g(3)j_  (242) 

i = 3,4 

^SiOD  ^ ^iROD  ^ I ^yiOD  ^ (i-2) I " ^ I ^yiOD  ^ (i-2)  ^ 


'^SR  ^ ^^i-2^  I (i-2)^  ^i-2^  9 (3)  (i_2) (243) 

i = 5,6 
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2.23.1 


1 Velocities  of  Tire  Contact  Points 


>^3  = " - '^OIR  "S 


“4  = “ ’’oiR 


'^5  = “ - ■=^OIR  ^R  “3 


'^6  = " ""OIR  "r  =3 


V3  V - br  - [Zj^  - p + 


3DE 


= V - br  - [Zj^  - p + Z^^^ 


Vc:  = V - br  - [Zj^  - Z3^^]  p + Z^^^  (j) 


3DE 


Vg  = V - br  - [Zj^  - Z^^^]  p + Z^^^ 


= w + bq  + + (p  + T 


R'  OIR 


= w + bq  + - (p  + 4>p)  T 


R'  OIR 


Wi-  = w + bq  + + (p  + T 


R'  OIR 


Wg  = w + bq  + - (p  + cf)p)  T 


R'  OIR 


(244) 

(245) 

(246) 

(247) 

(248) 

(249) 

(250) 

(251) 

(252) 

(253) 

(254) 

(255) 
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Wheel  velocities  in  the  ground  plane 


uci  = u.  + ew. 


Vq!  = V.  - *W. 


i = 3, 4, 5, 6 


2.23.12  Wheel  Camber  with  Respect  to  the  Road 


'♦'CGi  = ° 


i = 3, 4, 5, 6 


2.24  Solid  Front  Axle  and  Dual  Tires  on  Solid  Rear  Axle 
2.24.1  Resultant  Moments 


“ <®2  - Si>  (S,  - S3)  ^ 


(F  A + F t)  (z^  + 6^) 
yul  yu2  F F 


(F  o + F + F n + F c)  (z^  + 6_) 
yu3  yu4  yu5  yu6  R R 


(256) 

(257) 

(258) 


(190-1) 
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SN 


eu 


(S.,  + S2)  a - (S3  + b 


+®'xu2  <^F  + ^F  ' “I  ♦f  + ^2> 


■*'^xu3  '^R  ~T~  ‘*’r  ■ ^3ID' 


+F  ,,  (z„  + 6 


IR 


xu4  ' R R 2 ^R 


4>t=  - 


^4Id) 


T 


OR 


^^xu5  (^R  ^ ^R  ^ ^R  - 


^5ID^ 


■'■^xu6  ^^R  ~ 2 ^R  ~ ^6ID^ 


(191-1) 
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3.  NOTATION  AND  LIST  OF  SYMBOLS 
3 . 1 Notation 

The  time  derivative  of  a variable  is  indicated  by 
a dot  over  the  symbol  for  the  variable,  e.g., 

a = da/dt,  a = d^a/dt^ 

Special  symbols  for  mathematical  operations: 


|a|  = absolute  value  of  a 
sgn  a = algebraic  sign  of  a 


The  following  subscript  notation  is  used: 

i = wheel  identification  number, 

1 = right  front,  2 = left  front,  3 = right  rear 
4 = left  rear,  5 = right  rear  outside, 

6 = left  rear  outside 

j = identification  of  vehicle  end, 

j = F,  R for  the  front  and  the  rear, 
respectively 

s = sprung  mass 

u = unsprung  mass 

F = front,  or  front  axle 

R = rear,  or  rear  axle 

The  technical  dimension  system  is  employed  with 
the  fundamental  units  of  lb  (force) , in.  (length) , and  sec 
(time) , 
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' 3.2  List  of  Symbols 

3.2.1  Variables 


A = longitudinal  acceleration 
of  the  sprung  mass,  gees. 


lateral  acceleration  of  the 
sprung  mass,  gees. 


~ aerodynamic  moment  coefficients, 
given  as  tabular  functions  of 
T for  a = 0 . 


C . = resultant  velocity  of  the  con- 
tact point  of  wheel  i in  the 
ground  plane,  in. /sec. 

C^,  Cy,  = aerodynamic  force  coefficients, 
given  as  tabular  functions  of 
T for  a = 0 . 

d^^  = horizontal  distance  between 

aerodynamic  center  and  sprung 
mass  c .g . , in. 

^iFi'  ^iRi  ~ coulomb  damping  force  in  front 
and  rear  suspensions,  respec- 
tively, lb. 

F^„.,  F«„.  = suspension  force  produced  by 
^ deflection  of  springs  and  bump 

stops  in  front  and  rear  sus- 
pensions, respectively,  lb. 


^3Fi'  ^3Ri  ~ viscous  damping  force  in  front 
and  rear  suspensions,  respec- 
tively, lb. 

^4Fi'  ^4Ri  ~ suspension  force  produced  by 
auxiliary  roll  stiffness  in 
front  and  rear  suspensions, 
respectively,  lb. 
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^APFi'  ^APRI 

= antipitch  force  in  front  and 
rear  suspensions,  respectively, 
lb. 

^ARFi'  ^ARRi 

= antiroll  force  in  front  and 
rear  suspensions,  respectively, 
lb. 

F . = 
BSi 

= suspension  force  component  which 
is  the  difference  between  analog 
value  and  actual  spring  charac- 
teristic at  wheel  i,  lb. 

F . = 
Ci 

= tire  circumferential  force  at 
wheel  i,  lb. 

^CilD'  ^CiOD 

= dual  tire  circiimferential  force 
at  rear  inside  and  outside 
wheel,  respectively,  lb. 

FF,  FR  = 

= front  and  rear  brake  torque 
curves  which  are  input  as 
functions  of  brake  line  pres- 
sure, lb  in. 

F^[(SLIP)^]  = 

= nondimensional  tire  side-force 
shaping  function  versus  longi- 
tudinal slip  at  wheel  i. 

^iRID'  ^iROD 

= dual  tire  radial  force  at  rear 
inside  and  outside  wheel,  re- 
spectively, lb. 

^Ri 

= tire  radial  force  at  wheel  i, 
lb. 

^Si  = 

= tire  side  force  at  wheel  i,  lb. 

^SilD'  ^SiOD 

= dual  tire  side  force  at  rear 
inside  and  outside  wheel,  re- 
spectively, lb. 

^SWF'  ^SWR  ^ 

= front  and  rear  static  component 
of  the  sprung  mass,  lb. 

F • / F . / F . = 
xui  yul  zui 

= tire  force  components  at  wheel 
i along  the  sprung  mass  x-, 
y-,  z-axes,  respectively,  lb. 
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EF  , ZF  , ZF 
xs  ys  zs 

= components  of  the  resultant 
of  aerodynamic  forces  that 
act  directly  on  the  sprung 
mass,  along  the  sprung  mass 
X-,  y-,  z-axes,  respectively,  lb. 

ZF  , ZF  , ZF 
XU  yu  zu 

= components  of  the  resultant 
of  forces  that  act  on  the  un- 
sprung masses,  along  the  sprung 
mass  X-,  y-,  z-axes,  respectively,  lb 

g(3.)  = 

= nondimensional  tire  side  force 
shaping  function  for  combined 
slip  angle  and  camber  angle  at 
wheel  i. 

h.  = 
1 

= rolling  radius  of  wheel  i,  in. 

^1i'  ^2i  ' 

= slope  of  straight-line  segments 
approximating  circumferential 
friction  coefficient  at  wheel  i. 

M . = 
SSi 

= torque  applied  to  front  wheel  i 
by  the  steering  system  connect- 
ing rod,  lb  in. 

M . = 
Ti 

= moment  acting  at  front  wheel  i 
about  the  kingpin  axis  due  to 
tire-road  contact  forces,  lb  in. 

M . , M . = 
XFi'  XRi 

= tire  overturning  moment  at  wheel 
i,  front  and  rear  wheels,  re- 
spectively, lb  in. 

M . . M . = 

XlRID'  XiROD 

= dual  tire  overturning  moment  at 
rear  inside  and  outside  wheel, 
respectively,  lb  in. 

M . , M . = 

ZFi'  ZRi 

= tire  aligning  moment  at  wheel  i, 
front  and  rear  wheels,  respec- 
tively, lb  in. 

M . . M . = 

ZiRID'  ZiROD 

= dual  tire  aligning  moment  at 
rear  inside  and  outside  wheel, 
respectively,  lb  in. 

= 

cj)F 

= rolling  moment  acting  on  the 
front  axle,  lb  in. 
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EN 


(j)R 


rolling  moment  acting  on  the 
rear  axle,  lb  in. 


EN,^,  ' ” components  of  the  resultant 

^ moment  of  aerodynamic  forces 

that  act  directly  on  the  sprung 
mass,  about  the  sprung  mass 
X-,  y-,  z-axes,  respectively,  lb  in. 

components  of  the  resultant 
moment  of  forces  that  act  on 
the  unsprung  masses,  about 
the  sprung  mass  x- , y-,  z-axes, 
respectively,  lb  in. 

p,  q,  r = scalar  components  of  angular 
velocity  of  the  sprung  mass, 
taken  about  the  sprung  mass 
X-,  y-,  z-axes,  respectively, 
rad/sec . 

p,  q,  r = dimensionless  components  of 
angular  velocity  of  vehicle 
relative  to  wind  in  vehicle- 
fixed  axes. 

2 

Pp^  = brake  line  pressure,  Ib/in. 

2 

q = dynamic  pressure,  Ib/in. 

3, 


EN,  , EN„  , EN, 
4>u'  6u'  ipu 


= total  suspension  force  at  wheel 
i,  effective  at  the  wheel  for 
independent  suspensions  and  at 
the  spring  location  for  the 
solid  front/rear  axle,  lb. 

(SLIP) . = longitudinal  slip  ratio  at 
wheel  i. 

^ilD'  ^iOD  ~ longitudinal  slip  ratio  at  dual 
rear  inside  and  outside  wheel, 
respectively . 

T = Pitman  torque  at  the  steering 
^ gear  box,  lb  In. 
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= brake  torque  at  wheel  i, 
lb  in . 

TQ^  = 

= drive  torque,  lb  in. 

"^^DMAX 

= maximum  drive  torque,  lb  in. 

II 

> 

= scalar  components  of  linear 
velocity  of  the  sprung  mass, 
taken  along  the  sprung  mass 
x~,  y-,  z-axes,  respectively, 
in ./sec . 

Ui,  = 

= velocity  components  of  the 
contact  point  of  wheel  i along 
the  vehicle-fixed  axes,  in./ 
sec . 

^ilD'  ^iOD 

= forward  velocity  component  of 
the  contact  point  of  dual  rear 
inside  and  outside  v/heel,  re- 
spectively, along  the  vehicle- 
fixed  axes,  in. /sec. 

u , V , w 
r r r 

= components  of  vehicle  velocity 
relative  to  wind  in  vehicle- 
fixed  axes,  in. /sec. 

^Gi 

= forward  velocity  of  the  contact 
point  of  wheel  i in  the  ground 
plane,  in. /sec. 

^GilD'  ^GiOD 

= forward  velocity  of  the  contact 
point  of  dual  rear  inside  and 
outside  wheel,  respectively,  in 
the  ground  plane,  in. /sec. 

^CW 

= magnitude  of  vehicle  velocity 
relative  to  wind,  in. /sec. 

^Gi 

= lateral  velocity  of  the  contact 
point  of  wheel  i in  the  ground 
plane,  in. /sec. 
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~ lateral  velocity  of  the  con- 
^ tact  point  of  dual  rear  inside 

and  outside  wheel,  respectively, 
in  the  ground  plane,  in. /sec. 

= lateral  velocity  component  of 
the  contact  point  of  dual  rear 
inside  and  outside  wheel,  re- 
spectively, along  the  vehicle- 
fixed  axes,  in. /sec. 

'^ilD'  ''^iOD  ~ downward  velocity  component  of 
the  contact  point  of  dual  rear 
inside  and  outside  wheel,  re- 
spectively, along  the  vehicle- 
fixed  axes,  in. /sec. 

X,  y,  z = coordinates  of  a point  relative 
to  the  vehicle-fixed  coordinate 
axis  system,  in. 

X,  Y,  Z = coordinates  of  the  center  of 

gravity  of  the  sprung  mass  rela- 
tive to  the  space-fixed  coordin- 
ate axis  system,  in. 

y__  = linear  displacement  of  the 

steering  system  connecting  rod, 
in. 

= coordinate  of  individual  wheel 
center  above  the  road  surface,  in. 

= inertial  position  of  the  rear 
dual  inside  and  outside  wheel 
center,  respectively,  in. 

Z..„-  = wheel  contact/lift-off  indi- 
cator . 

Z . = input  function  to  wheel  center 
i which  represents  elevation 
change  in  reference  surface 
(initially  equal  to  zero) , in. 
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Z-  , ^4de  ~ inertial  position  of  a single 
equivalent  wheel  center  re- 
placing the  right  and  left 
pair  of  rear  dual  wheel  centers 
respectively,  in. 

a = aerodynamic  angle  of  attack, 
rad . 

3 = vehicle  body  angle  of  side- 
slip, rad. 

3j^  = slip  angle  at  wheel  i,  rad. 

3.'  = "equivalent"  slip  angle  produced 
by  camber  effects  at  wheel  i, 
rad. 

F-  = nondimensional  slip  angle 
variable  for  wheel  i 

6 . = suspension  deflection  relative 
to  the  vehicle  from  the  posi- 
tion of  static  equilibrium, 
measured  at  the  center  of  wheel 
i , in . 

6pwi  = angular  displacement  of  front 
wheel  i produced  by  the  steer- 
ing system,  rad. 

= suspension  deflection  relative 
to  the  vehicle  from  the  position 
of  static  equilibrium  at  the 
center  of  the  solid  front  axle, 
in . 

= suspension  deflection  relative 
to  the  vehicle  from  the  position 
of  static  equilibrium  at  the 
center  of  the  solid  rear  axle, 
in . 

= suspension  deflection  relative 
to  the  vehicle,  measured  at 
the  center  of  wheel  i from  the 
position  of  static  equilibrium 
at  curb  (no-load)  condition,  in. 
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= steering  wheel  displacement, 

oW  j 

rad . 

C . = suspension  deflection  rela- 
tive to  the  vehicle  from  the 
position  of  static  equilibrium, 
measured  at  the  spring  loca- 
tion i,  in. 

= suspension  deflection  relative 
to  the  vehicle,  measured  at 
the  spring  location  from  the 
position  of  static  equilibrium 
at  curb  (no-load)  condition,  in. 

<; ! = deflection  of  the  center  of 
1. 

wheel  i (solid  front/rear  axle) 
relative  to  the  vehicle  from 
the  position  of  static  equilib- 
rium, in. 

©Si  = caster  angle  of  front  wheel  i 
relative  to  the  vehicle-fixed 
coordinate  axis  system,  posi- 
tive for  rearward  inclination 
of  the  steering  axis  in  the 
upward  direction,  rad. 

'^ilD'  ^iOD  ~ circumferential  friction  co- 
efficient at  dual  rear  inside 
and  outside  wheel,  respectively. 

y -Tn'  ^ -riT^  ~ lateral  friction  coefficient 
yilD  yiOD  dual  rear  inside  and  out- 

side wheel,  respectively. 

^Oi'  ^1i  ~ circumferential  friction  co- 
efficient at  braking  slip  equal 
to  zero  and  one,  respectively. 

Vipp/  IJpj^  = peak  braking  friction  coef- 
ficient, front  and  rear  wheels, 
respectively . 

y . = lateral  friction  coefficient 
at  wheel  i 


r 
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u ! = circumferential  friction 

^ 1 

coefficient  at  wheel  i. 

T = aerodynamic  angle  of  side 
slip,  rad. 

(|) , 0 , ip  = Euler  angular  coordinates 

(roll,  pitch,  and  yaw  angles) 
of  the  sprung  mass  relative 
to  the  space-fixed  coordinate 
axis  system,  rad. 

(j) . = camber  angle  of  wheel  i rel- 
ative to  the  vehicle-fixed 
coordinate  axis  system,  posi- 
tive when  clockwise  as  viewed 
from  the  rear,  rad. 

= camber  angle  of  wheel  i rel- 
ative to  the  ground  plane, 
rad . 

= angular  displacement  of  the 
front  axle  relative  to  the 
vehicle  about  a line  parallel 
to  the  x-axis  through  the 
front  axle  c.g.,  positive 
when  counterclockwise  as 
viewed  from  the  front,  rad. 

= angular  displacem.ent  of  the 
rear  axle  relative  to  the 
vehicle  about  a line  parallel 
to  the  x-axis  through  the  rear 
axle  c.g.,  positive  when  clock- 
wise as  viewed  from  the  rear, 
rad . 

4j  . = steer  angle  of  v;heel  i rela- 
tive to  the  vehicle-fixed  co- 
ordinate axis  system,  positive 
for  clockwise  steer  as  viewed 
from  above  vehicle,  rad. 

CO . = rotational  velocity  of  wheel 
i,  rad/sec. 
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3.2.2  Parameters 


a = distance  in  the  x-direction 
between  the  center  of  gravity 
of  the  sprung  mass  and  the 
centerline  of  the  front 
wheels,  in. 

= length  of  steering  linkage 
arm  at  front  wheel  i,  in. 


a 


P 


length  of  Pitman  arm,  in. 


Aqj,,  A2P  = coefficients  of  second  degree 

curves  fitted  to  small-angle 
cornering  stiffness,  front 
wheels . 

A^p , A^p  = coefficients  of  second  degree 
curves  fitted  to  small-angle 
camber  stiffness,  front  wheels. 


A|-_,  A-  , A«  = coefficients  of  second  degree 

curves  fitted  to  small-angle 
cornering  stiffness,  rear 
wheels . 

A^p/  A^j^  = coefficients  of  second  degree 
curves  fitted  to  small-angle 
camber  stiffness,  rear  wheels. 

Ap^ , A 2/  A 2 = coefficients  of  functions 

fitted  to  tire  aligning  torque, 
front  wheels . 


Ar^  , Ar2  , Ar2  = coefficients  of  functions  fitted 

to  tire  aligning  torque,  rear 
wheels . 


ARj,  = drive  axle  ratio  for  the  front, 
i.e.,  propeller  shaft  speed  to 
wheel  speed. 


ARj^  = drive  axle  ratio  for  the  rear, 
i.e.,  propeller  shaft  speed  to 
wheel  speed. 
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= proportionality  factor  de- 
fining limits  of  small-angle 
cornering  and  camber  stiff- 
ness variation  with  tire 
loading,  front  and  rear  wheels, 
respectively . 

b = distance  in  the  x-direction 

between  the  c.g.  of  the  sprung 
mass  and  the  centerline  of  the 
rear  wheels,  in. 

B<jp,  ^3F'  ^4F  ~ coefficients  of  curves  fitted 

to  lateral  friction  coefficient, 
front  wheels . 

, B^_  = coefficients  of  curves  fitted 

to  lateral  friction  coefficients, 
rear  wheels , 

C.„,  C.  = coefficients  of  5th  degree 
^ ^ polynomials  (i  = 0 to  5)  fitted 

to  wheel  camber  angle  versus 
suspension  deflection,  front 
and  rear  wheels,  respectively. 

= viscous  damping  in  steering 
gear,  effective  at  the  steer- 
ing system  connecting  rod, 
lb  sec/in. 

Cfcr  coulomb  friction  in  steering 
gear,  effective  at  the  steer- 
ing system  connecting  rod,  lb. 

= slope  of  straight-line  segments 
(k  = 1 to  4)  fitted  to  the 
shock  absorber  force  character- 
istics for  a single  wheel,  ef- 
fective at  the  spring  location 
for  the  solid  front  axle  and 
at  the  front  wheel  for  inde- 
pendent front  suspension,  lb 
sec/in. 
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C_,  = slope  of  straight-line  seg- 
ments (k  = 1 to  4)  fitted 
to  the  shock  absorber  force 
characteristics  for  a single 
wheel,  effective  at  the  spring 
location  for  the  solid  rear 
axle  and  at  the  rear  wheel  for 
independent  rear  suspensions, 
lb  sec/in. 


Cpi,  = coulomb  damping  for  a single 

wheel,  effective  at  the  wheel 
for  independent  suspensions 
and  at  the  spring  location 
for  the  solid  front/rear  axle, 
front  and  rear  wheels , re- 
spectively . 


, C , C , C , C = aerodynamic  stability  deri- 
r a q p r vatives . 

D.p,  D._  = coefficients  of  5th  degree 
^ ^ polynomials  (i  = 0 to  5)  fitted 

to  v/heel  toe  angle  versus  sus- 
pension deflection,  front  and 
rear  wheels,  respectively. 

= coefficients  of  5th  degree 

polynomials  (i  = 0 to  5)  fitted 
to  front  wheel  caster  angle 
versus  suspension  deflection. 


g = acceleration  due  to  gravity 

2 

= 386.4  in. /sec. 


H.  = viscous  damping  derivative  at 
front  wheel  i,  lb  in.  sec/rad. 


Hp^  = distance  between  the  ground  and 
the  roll  center  of  the  inde- 
pendent front  suspension,  in. 


Hrc  = distance  between  the  ground 
and  the  roll  center  of  the 
independent  rear  suspension, 
in . 
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= drive-line  moment  of  inertia 
for  front  wheel  drive,  lb  in. 

sec  .2 

= drive-line  moment  of  inertia 

for  rear  wheel  drive,  lb.  in. 
2 

sec 


Ip  = moment  of  inertia  of  solid 

front  axle  about  a line  through 
its  center  of  gravity  and 
parallel  to  the  x-axis , lb  in. 

sec  .2 


= moment  of  inertia  of  individ- 
FW 

ual  front  wheel  about  the  king- 
pin axis,  lb  in.  sec. 2 


Ip  = moment  of  inertia  of  solid 

rear  axle  about  a line  through 
its  center  of  gravity  and 
parallel  to  the  x-axis,  lb  in. 
sec . ^ 


’WF'  WR 


moment  of  inertia  of  individual 
wheel  about  its  spin  axis , 
front  and  rear  wheels,  re- 
spectively, lb  in.  sec.^ 


moment  of  inertia  of  sprung 
mass  about  the  x-,  y-,  z-axes, 
respectively,  lb  in.  sec. 2 


I^^  = product  of  inertia  of  sprung 
mass  with  respect  to  the  x- 
and  z-axes,  lb  in.  sec. 2 


I' 


z 


= moment  of  inertia  of  unsprung 
mass,  lb  in.  sec.^ 


I ' = product  of  inertia  of  unsprung 

mass,  lb  in.  sec. 2 


Kpp,  K„p  = lateral  force  compliance  camber 
coefficient,  front  and  rear 
wheels,  respectively,  rad/lb. 
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= suspension  load-deflection 
rate  for  a single  wheel  in 
the  quasi-linear  range  about 
the  position  of  static  equi- 
librium, effective  at  the  spring 
location  for  the  solid  front 
axle  and  at  the  front  wheel  for 
independent  front  suspensions, 
Ib/in. 

= suspension  load-deflection 
rate  for  a single  wheel  in  the 
quasi-linear  range  about  the 
position  of  static  equilibri- 
um, effective  at  the  spring 
location  for  the  solid  rear 
axle  and  at  the  rear  wheel 
for  independent  rear  suspen- 
sions, Ib/in. 

Kpg  = roll  steer  coefficient  of  the 
solid  front  axle,  positive 
for  roll  understeer,  rad/rad. 

= roll  steer  coefficient  of  the 
solid  rear  axle,  positive  for 
roll  understeer,  rad/rad. 

Kg^  = flexibility  in  steering  col- 
umn and  steering  gear  box, 
lb  in. /rad. 

Kg^^  = flexibility  in  steering  link- 
age at  front  wheel  i,  lb  in./ 
rad . 

KgR  “ aligning  torque  compliance 

steer  coefficient  at  the  rear 
wheels,  rad/ (lb  in.) 

= tire  load-deflection  rate  in 
the  quasi-linear  range  for  a 
single  tire  at  wheel  i,  Ib/in. 

Ktq  = gain  in  drive  torque,  lb  sec. 

£ = wheelbase  length  of  vehicle, 
in . 


rji' 
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Z = characteristic  vehicle  length 
upon  which  aerodynamic  moment 
coefficients  are  referenced, 
in . 

= effective  mass  of  the  steering 
system  connecting  rod,  lb  sec^/ 
in. 

Mg  = total  sprung  mass,  lb  sec  /in. 

M „ = total  front  unsprung  mass, 

^ lb  sec^/in. 

= total  rear  unsprung  mass,  lb 

uK  9 / . 

sec^/in • 

ZM  = total  vehicle  mass,  lb  sec^/in. 

Ng  = gear  ratio  of  the  steering 
gear  box. 

OpQ,  0p«|  f *^f2  ' ^F3  ~ coefficients  of  functions  fitted 

to  tire  overturning  moment,  front 
wheels . 


^RO  ' *^Rl  ' *^R2 ' ^R3  ~ coefficients  of  functions  fitted 

to  tire  overturning  moment,  rear 
wheels . 


, Pgp2  ~ coefficients  of  curves  fitted  to 

peak  braking  friction  coefficient, 
front  wheels . 


^BRl ' ^BR2  ~ coefficients  of  curves  fitted  to 

peak  braking  friction  coefficient, 
rear  wheels . 

PpQ,  / Pp2  “ coefficients  of  curves  fitted  to 

antipitch  coefficient,  front 
wheels . 

Pro / ~ coefficients  of  curves  fitted 

to  antipitch  coefficient,  rear 
wheels . 
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PT  = front  wheel  caster  offset,  in. 

Rp,  “ auxiliary  roll  stiffness  at 

front  and  rear  suspensions,  re- 
spectively, lb  in. /rad. 


^0'  ^1'  ^2 


coefficients  of  curves  fitted 
to  antiroll  coefficients,  front 
wheels . 


^RO ' ^Rl ' ^R2  ~ coefficients  of  curves  fitted 

to  antiroll  coefficients,  rear 
wheels 

R = undeflected  wheel  radius,  in. 
w ' 

= projected  frontal  area  of  ve- 
hicle, in. 2 


= longitudinal  slip  at  wheel  i 
at  which  peak  braking  friction 
occurs . 


(SN) 


SO 


skid  number  of  simulated  surface. 


(SN)^  = skid  number  of  surface  on  which 
tire  data  were  obtained. 

SN.  = skid  number  ratio  of  simulated 
surface  to  tire  data  surface. 


Tp,  Tp  = wheel  tread  width  at  the  front 
and  rear,  respectively,  in. 

TjP  = distance  between  the  centers 
of  inside  tires  in  the  y- 
direction  for  solid  rear  axle 
with  dual  tires,  in. 

Tqp  = distance  between  the  centers 
of  outside  tires  in  the  y- 
direction  for  solid  rear  axle 
with  dual  tires,  in. 

Tgp  = distance  in  the  y-direction 

between  the  spring  centers  for 
solid  front  axle,  in. 
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/ 


= distance  in  the  y-direction 
between  the  spring  centers  for 
the  solid  rear  axle,  in. 


V = desired  constant  vehicle 
velocity,  in/sec. 


V 

yw 


velocity  of  cross  wind  in 
space-fixed  axes , measured 
at  sprung  mass  c.g.,  in. /sec. 


yg^j^  = distance  between  the  kingpin 
axis  and  wheel  centerline , 
measured  along  the  wheel  spin 
axis  at  front  wheel  i,  in. 

^BIAS  ~ constant  to  vertically 

shift  the  vehicle  c.g.  posi- 
tion, in. 


z = static  distance  in  the  z-direc- 
tion  between  the  c.g.  of  the 
sprung  mass  and  c.g.  of  the 
front  unsprung  masses,  in. 

Zj^  = static  distance  in  the  z-direc- 
tion  between  the  c.g.  of  the 
sprung  mass  and  c.g.  of  the 
rear  unsprung  masses,  in. 

6„_„,  = static  displacement  of  the 

independent  front/rear  sus- 
pension from  the  position  of 
static  equilibrium  due  to 
loading  condition,  in. 

• • • • 

6 , 6 , 6 »,  6 = abscissa  of  the  break  points 

in  the  shock  absorber  force 
characteristic  (independent 
front/rear  suspension) , com- 
pression and  extension,  respec- 
tively, in. /sec. 
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AC^  = increment  in  axial  force  co- 
efficient, given  as  tabular 
function  of  a. 


A4>^  = magnitude  of  camber  play  at 
front  wheel  i,  rad. 

A9^  = static  caster  angle  bias  at 
front  wheel  i,  rad. 

Alp . = static  toe  angle  bias  at  front 
wheel  i,  rad. 

e . = free  play  in  steer  of  front 
^ wheel  i,  rad. 


free  play  in  steering  gear 
box,  rad. 


CpiN'  ^RiN  “ static  displacement  of  the 

front/rear  suspension  (solid 
front/rear  axle)  from  the  posi- 
tion of  static  equilibrium  due 
to  loading  condition,  in. 

• • • • 

C = abscissa  of  the  break  points 

in  the  shock  absorber  force 
characteristic,  (solid  front/ 
rear  axle)  compression  and  ex- 
tension, respectively,  in. /sec. 

A . = brake  torque  multiplier  at 
wheel  i. 


Aj^  = drive  torque  distribution 
factor . 


y , y = coefficient  of  sliding  fric- 
° tion,  front  and  rear  wheels, 
respectively. 

2 4 

p = air  density,  lb  sec  /in. 

Q. 

(j)  . = kingpin  inclination  angle  at 

^ front  wheel  i,  raci. 


CO  , 

xw 


U) 


zw 


angular  velocity  cf  wind  in 
space-fixed  axes,  rad/sec. 
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HYBRID 

APPENDIX  B 

COMPUTER  VEHICLE  HANDLING  SIMULATION 

IMPLEMENTATION  DOCUMENTATION 

1.  PRESENTED  HERE  IS  THE  COMPUTER  LISTING  OF  THE  DSL/91 
DIGITAL  STATIC  CHECK  PROGRAM 
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■■'  V,  .V--  . YJl6tA»t*8Aa'»pD<«y3^0Jtt*W^ 


fe  >^rov}.S'3*^, 

■V  --  ’ " .-:' 


1.  1 ■• 


Lf  j*'  - ^ - ' ■ ' ; • j-  .,;  "a  ■:  J 

'S'A*1 ' '‘' '‘'^tt-i  11k  ..rx 

"~'w 

.VV;  ■ 


f.  • 1 

. ' I 

; . . a* 


^SUSPENSION 

FlFl 

F1F^ 

F1K3 

F1P4 

« 


FORCE  EQUATIONS 


= SI6N(U»2ET1DT>*CFP 
= SI6N(1,*ZET2DT)*CFP 
= SIGN ( 1 , »2ET3DT) «CRP 
= SIGN ( 1 , ♦ZET40T) *CRP 
ANTI  EQUATIONS  TO  bE  INCLUDED  IN  DSL  LATER 
ANTIl  = AP1*ARI-FBS1 
ANTI2  = AP2+AR2-F8S2 
ANTI3  = AP3*AR3-FBS3 
ANTIA  = AP4+ARA-F0S4 
TEMPORARY  ANTI  VALUES 
ANT 1 1 = 450 , 

ANTI2  = 300, 

ANTI3  = 350 
ANTI4  = 500. 


AUXRLl  = (DEL2’'0EL1  )<^RF/TF/TF 
AUXRL2  s (DEL1-DEL2)  <»RF/TF/TF 


MAIN  730 
MAIN  740 
MAIN  750 


^RADIAL 

« 


TIRE  FORCE  AND  ROLLING  RADIUS  EQUATIONS 


ZIP 
Z2P 
Z3P 
Z4P 
FRl 

IF ( (RW 
FR2 

IF ( (RW 
FR3 

IF ( (RW 
FR4 

IF ( (RW 

FXUl 

FXU2 

FXU3 

FXU4 

FYUl 

FYU2 

FYU3 

FYU4 

NPHIF 

NPHIR 


= RW4ZF+20-A»THEO*TF*0,5»PHIO 
= RW*ZF*ZO-A*THEO-TF*0,5*PHIO 
s ZO*B«THEO^TR*0,5»PHIO*ZR4RW 
=ZO*B»THEO-TR«0,5»PHIO*ZR+RW 
= 0, 

♦ ZD.GT.O.)  FRIbAKTI*  (RW^Zl ) 

= 0, 

*Z2) ,GT,0, ) 

= 0, 

♦Z3) ,GT.O. ) 

= 0, 

♦Z4) .GT.O, ) 


FR2=AKT2« (RW*Z2) 
FR3=AKT3* (RW*Z3) 


FR4sAKT4» (RW*Z4) 

FR1» (THE0-U1P«C0S(PSI1 ) -Fl*AMUl* 
FR2*(THE0-U2P*C0S(PSI2)-F2»AMU2* 
= FR3*  (THE0-U3P*C0S  (PSI3)  -F3<»aMU3» 
= FR4* (THE0-U4P«C0S (PSI4)-F^*AMU4* 
= FR1*(-PHI0-U1P*SIN(PSI1) ♦F1*AMU1 
= FR2*(-PHI0-U2P»SIN(PSI2) ♦F2*aMU2 
= FR3»(-PHI0-U3P»SIN(PSI3> ♦F3*AMU3 
= FR4* (-PHI0-U4P»SIN (PSI4) ♦FA«aMU4 
= -FR1*(TF*.5*Z1»DEL2)  ♦FR2*(TF<»,5-Z2 
(TF*.5<»DEL2-Z1  )-FYU2»(-TF»,5^^DEL^- 
= -FR3*  (TR*0.5*Z3»DEL4)  *FR4<»  (TR*0, 
(TR<»0.5«DELA-Z3)  -FYU4«  (-TR*0,5 


SIN(PSI1)*6B1) 

SIN(PSI2)«6B2) 

SIN(PSI3)«GB3) 

SIN(PSI4)<*G84) 

*C0S(PSI1)*GB1) 

«»COS  (PSI2)  »GB2) 
*C0S(PSI3) *GB3) 
»C0S(PSI4)*GB4) 
*DEL2)-FYU1»  ... 
Z2)*(S1-S2)*TSF*,5 
5-Z4*0ELA)-FYU3*,., 
<»DEL4-Z4)  * (S3-S4)«TS«0,5 


B90 

900 

910 

920 

930 

940 

950 

960 

970 

900 

990 


MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAINIOOO 
MAIN1130 
MAINl 140 
MAIN1320 
MAIN1330 
MAINI340 
MAINI350 
MAIN1360 
MAIN1370 
MAIN130O 
MAIN1450 
MAIN1460 
MAIN1470 
MAIN1480 
MAIN1490 
MAIN1500 
MAIN1510 
MAIN1520 
MAIN1530 
MAIN1540 
MAIN1550 
MAIN1560 
MAIN1570 
MAIN1580 
MAIN1590 
MAIN1600 


MAIN1610 

MAIN1620 


MAIN1630 

MAIN104O 

•»STEERING  SYSTEM  EQUATIONS 

MAIN105O 

*ESP*EP1 »EP2 

DENOTE  LIMITER  SETTINGS 

MAIN1860 

TP 

= 

ANG«AKSC» (DELSW0-AN6*YCR/AP-ESP/2, ) 

MAIN1870 

AMSSl 

= 

AKSL1*(  (DFW1-.YCR/AAD-EP1/2,) 

MAIN1880 

AMSS2 

5 

AKSL2»(  (0FW2-YCR/AA2) -EP2/2, ) 

MAIN1890 

MAIN1900 

DFwIDD 

S 

(- AH 1»DFW1DT*MTI- AMSSl ) /AIFW-RDTO 

MAIN1910 

DFW2DD 

S 

(-AH2«DFW2DT*MT2-AMSS2) /aIFW-RDTO 

MAIN1920 

ycrdd 

= 

(1,/AMCR)*(-CFCR  - CCR*YCRDT  * TP/AP  ♦ AMSSl/AAl  ♦ 

•••  MAIN1930 

AMSS2/AA2) 

MAIN1940 

144 


«««»««»«««  listing  of  DSL/91 

digital  program  <»«**••«»*« 

MAIN 

10 

TITLE 

PR0B;52  VEHICLE 

SIMULATION  MU# 

MAIN 

20 

INCON 

DFW2DT 

= 37. 

♦ DFW2 

= 0.15 

tYCRDT 

=80,  tYCR 

= 2,55  • 

, MAIN 

40 

INCON 

RPSl 

=43l06 

♦ RPS2 

=43,06 

»RPS3 

=43,057 'XPS2DT=1000U, 

MAIN 

50 

INCON 

RPS4 

=43,057 

*XPS4DT=10000. 

.DFW1DT  = 30,  „.,DFW1. 

= 0.35 

MAIN 

60 

INCON 

PSil 

=,2140 

♦ PSI2 

=.2040 

»PSI3 

= ,01667»PSJ4 

=-,0150 

MAIN 

70 

INCON 

ZO 

=-23,4 

fTHEO 

=,00209 

tPHIO 

=,00300»RDTO 

=-500,0 

MAIN 

80 

INCON 

UOl 

= .120 

»U02 

= 1.01 

♦ U03 

= ,900  »,U04 

=1.250 

MAIN 

90 

INCON 

Ull 

=-.6133 

*U12 

= 1.11 

tU13 

=1.621  .U14 

=1.700 

MAIN 

,100 

INCON 

AMI  1 

= 5,25 

»AM12 

=-7.40 

♦ AM13 

=-7.56  »AMl4 

=-b, 30 

MAIN 

no 

INCONi 

■ tufbr 

=8000, 

tTQRBR 

=7100, 

.MTl 

=-164,3.MT2 

=164,3 

MAIN 

120 

INCON 

-puto 

= -.12 

tUDTO 

=.0900 

♦ UO 

=704.  ,VO 

=,1300 

MAIN 

130 

INCON 

WO 

=,0050 

*PO 

=,0200 

«QO 

= -,0370»  RO 

=,0110 

MAIN 

140 

INCON 

FI 

= .9 

.F2 

= .8 

♦ F3 

=-,3  *F4 

= ,6 

MAIN 

150 

INCONI 

' GBl 

= .2 

*G02 

= .4 

»GB3 

=,5  »GB4 

= .85 

MAIN 

160 

PARAM 

AMS 

*5,162 

» AMUF 

=0,359 

♦ AMUR 

=0,574  ,TS 

= 35. B6 

MAIN 

170 

PARAM 

A AIR 

= 800, 

»RF 

=81E03 

*TF 

=54,3  »RR 

=50E03 

MAIN 

180 

PARAM 

rw 

=12,85 

» AIFW 

=5.815 

♦ AHl 

=200.  »AH2 

= 200, 

MAIN 

190 

PARAM- 

AMI 

= 812, 

» AKT2 

= 812. 

♦ AKT3 

=1192.  »AKT4 

=1192. 

MAIN 

200 

PARAM 

AMCR 

= 0,08 

♦ CFCR 

= 200, 

♦ CCR 

=11.  »AP 

= 6,06 

MAIN 

210 

PARAM 

AAl 

= 5,53 

« A A2 

= 5,53 

♦ ANG 

= 17,5.  tAKSC 

= 610, 

MAIN 

220 

PARAM 

ESP 

=-,6 

tAKSLl 

*1.17E5 

.AKSL2 

=1 .17E5»EP1, 

=-,0200 

MAIN 

230 

PARAM 

EP2 

= -,01 

» aiwf 

*7,3777 

*AID 

=0,3  tARBR 

=4,125 

MAIN 

240 

PARAM 

AlwR 

=7.3777 

tCFP 

= 25. 

♦ CRP  ,, 

^ = 45.,  «TR 

=53,3 

MAIN 

250 

PARAM 

AKFl 

= 150, 

»AKF2 

= 150. 

»AKR3^ 

=200, fAKR4 

= 200, 

MAIN 

260 

PARAM 

aa 

= 56.3 

«B 

= 39,0 

♦ G n 

♦ AMU2,, 

= 386,4^.ZF^.3 

= 10,6 

MAIN 

270 

PARAM 

^ZH 

= 10.6 

. AMUl 

*.1795 

Ta7?5,,^AMU3„. 
*^=  498rVTSF 

=,2870 

MAIN 

280 

PARAM 

HRC 

=4,70 

tCRRC 

*0,0110 

«tanpX 

♦ LB3 

0=1.425 

MAIN 

300 

PARAM 

''L'Bl 

= 1.65 

»L82 

= 1.65 

= 1,0 

MAIN 

310 

PARAM 

^‘AIDF 

= .7 

» ARFBR 

» 2,7 

»AIF 

= 32,25 

PARAMi 

■■  A'MU4 

=,2870 

»F0TM 

* 250, 

.ROTM 

^=.4gp,,.HFC,^ 

= 7,20 

PARAMi 

SCALE  = 

1000. 

♦ RWSF 

*20, 

MAIN 

320 

■ I"' J.h'' 

(S'l-  WP;.  »ST>iA~ii 

W.  \ 

MAIN 

330 

* . 

MAIN 

350 

PARAM  lAi^AALE  = 
PARAM  ■^f-A'ALE 

H 

0 

^•"tT>i4  = C 

W ( Uo  - 

MAIN 

360 

pa'ram  T aMIDRSW*  0 
***C0MMENTS<*«« 

« 

» 


« 

« 

« 

« 


; 

j - ;-i 
/J 


DSL  application 


« 

:-^i  ■ 


SYMBOLS^  PHIF  AND'^PHIR  -ARE 
DELA  AND  D£L2,  SYMBOL^S'  ARE  RETAIJ^ED'  FOPI 
INDEPENDEN^T  AND'  SOt  lD,  A^LEi/COND.nrO^^^  X,. . : X : 

POTS  AND  AMPLIFIERS  ARE  .OUSASI-ORDEREDvA^^ 

AND  FULLY  ORDERED  POST-COMPUTaTJON 
IDULTR  = 0/SJN,GLE  WHEEL  , ON,  REaR^  .:  X t j ■ 

IDULTR  = 1/DUAL  WHEELS  "oN  REAR 
IDRSW  = 0 /FREE  ROLLING  FRONT  WHEEL^  -^  . X ; v 
IDRSW  = 1/PpwERED  FRONT  wheels  \'«ri1v- ' - c 
REAR  WHEELS  ALWAYS  POWERED  ‘ XX 

(€:v- A :j'  - ■ 


* 23I*R  scaled  for  beta  TIMES  REAL  TIME 
o DIGITAL  BETA  SYMBOL  IS  ANALOG  1/BETA 

*■'‘'■8  T_*' 

PARAM'iiflETA  =0,25 

* 


;0/’?TT3c 


CONTRLX  TSTART  = 0.0*FINTIM=.002.DELT  = ,00"l^f^"jq^l!t^^J;^';,!^il 

( c- ^ SaA  "%P J '■  "■ 


DYNAMIC^' 

»;■  ? b i r- ! A M 

•SYSTEM-'  EQUATIONS 

f ^'1 , A.  i 


OT"!,:-’  W3iA\<  iSCMA^iT' 
OT0B-W3*  A\ {S22MA-8T; 

^43:'^ 


MAIN  370 
MAIN  380 
MAIN  390 
MAIN  400 
MAIN  410 
MAIN  420 

MAIN  440 
MAIN  450 
MAIN  710 
MAIN  720 


MAINI950 

«»wheel  rotational  equations 

MAIN1960 

MAIN1970 

SFSF  = lOOO./lOOOO. 

MAIN1980 

« 

MAIN1990 

* circumferential  friction  coefficient 

MAIN2000 

MAIN201  0 

U1  = UO-TF*0.5*RO*ZF*QO 

MAIN2020 

U2  = UO*TF<»0,5ttRO  + ZF*QO 

MAIN2030 

U3  = U0-TR*0.5*RO*ZR*00 

MAIN2040 

U4  = UO*TR<»0.5»RO*ZR*QO 

MAIN2050 

« 

MAIN  400 

•SYSTEM  EQUATIONS 

MAIN  720 

« 

MAIN  730 

« AXLE^O/SOLID  front»solio  rear 
« AXLE=1/INDEPENDENT  FWONTfSOLID  REAR 

axle=2/independent  front* independent  rear 
IF(AXLE-I)  100*200,300 


100 


CONTINUE 
SOLID  FRONT 
DELI  e ,5 
DELIDT*  5, 
0EL1DD= 
0EL2  = 
DEL20T= 


SMP/AMS*G* (S1*S2-FR1-FR2) /amuf*a»qdto 

.015 

.95 


DEL2DD  = «PDT0* (NPHIF- (FYU14FYU2) *HFC-TSF*,5*F0TM)  / AIF 


ZET 


zetdt 


200 


NOT  DERIVED  FROM  INTEGRATION  OF 
ZETl  = T5F/2.«DEL2*DEL1 
ZET2  =-TSF/2.*DEL2*DELl 
ZET10T=  TSF/2.«DEL2DT^DEL1DT 
ZET2DT=-TSF/2.*DEL2DT*DELiOT 
F2F1  =AKF1«ZET1 
F2F2  s AKF2*ZET2 
F3F1  » 201.5 
F3F2  *-041.1 
F4F1  =-RF*DEL2/TSF 
F4F2  = RF*DEL2/TSF 

SIP  * -F1F1-F2F1-F3F1-RF*0EL2/TSF  ♦ANTII 
S2P  =-F1F2-F2F2-F3F2*RF*DEL2/TSF*ANTI2 
Zl  aZlP*DELl*TFtt.5»DEL2-RW 
Z2  * Z2P*0EL1-TF«.5*DEL2-Ri«/ 

VI  = V0*A»R0-ZF*P0>Z1*DEL2DT 
V2  = V0  + A»R0-ZF*P0^Z2*P0  + Z2<»DEL2DT 
W1  = W0-A»Q0+DEl1DT* (DEl20T*P0) *TF/2. 

W2  * W0-A*Q0^0El10T-(0EL20T*PO) *TF/2. 

A005A  S-DEL2DT 

AOO/A  * 4,»DEL2 

A014A  =DEL2DT 

D005D  sDEL2DO/10.»BETA 

D007D  =-DEL2DT/2.5*BETA 


CONT INUE 
SOLID  REAR 
DEL3  = 0.0 
DEL30T  = 20, 

DEL3DD=  SMP/AMS*G+ (S3^S4-FR3-FR4) /AMUR-B»QDT0 


MAIN1320 

MAIN2010 


MAINlOlO 


MAIN1790 

MAIN1770 


MAIN  670 
MAIN  680 
MAIN1750 


145 


DEL"^  = 0.01895 
DEL^DT=  ,55 

DEL^DD  = -PDTO*  ( NPH I R-  ( F YU3*F  YU4 ) <»HRC-ROTM-TS«  . 5 ) / A I R 
* / 

* ZET  not  derived  FROM  INTEGRATION  OF  ZETDT 

ZET3  = (TS/2.)  <»6eLA  ♦ DEL3 
ZET^  = - (TS/2, ) »DELA  ♦ OEL3 
ZET3DT  =»  (TS/2. ) *DEL4DT^  QEL3DT 
ZETAOT  = - (TS/2, ) «OEL^OT*  DEL3DT 
F2H3  = AKR3«ZET3 
F2RA  = AKR4*ZET4 
F3K4=195,9 
F3H3=345,6 

S3P  =-F3R3-F2R3-F1R3- (RR/TS) *DEL^*ANTI3 
S4P  =-F3R4-F2R4-F1R4* (RR/TS) *DEL^*ANTI4 
Z3=  Z3P^DEL3*TR*0,5*DEL4-RW 
Z4  = Z4P40EL3-TR<».5»DEL4-RW 

V3=  V0-B*R0-ZR»P0*Z3*P0*Z3<*DEL4DT 
V4=  V0~B«R0-ZR*P0-Z4*P0*Z4»DEL4DT 
W3  = »^0-B<»Q0*DEL3DT*  (DEL4DT*P0)  *TR»,5 
W4=W0*B»Q0*DEL3UT- (DEL40T^P0) «TR*,5 
A015A  =-DEL4DT 
A017A  = 4,«DEL4 
D017D  =-DEL4DT/2.5«BETA 
D015D  = DEL4DD/10.«BETA 
IF  (AXLE.EQ.O)  goto  400 

ft 

300  CONTINUE 

* INDEPENDENT  FRONT 

DELI  s .383 
DEL1DT=  10, 

DELIDD  = SMP/AMS-TF*0.5*POTO*A<»QDTO*2,/AMUF»(-FRl*Sl-FYUltt.,, 
TAN  (2,<»HFC/TF)  ) *6 
DEL2  = 1.866 
DEL2DT=15. 

DEL2DD  = SMP/AMS4.TF*0.5»PDTO*A*»QDTO*2./AMUF<M-FR2*S2-t-FYU2#,  . . 
TAN (2,*HFC/TF) ) *6 

* ZET  not  derived  FROM  INTEGRATION  OF  ZETDT 

ZETl  a DELI 
ZETlDTa  DELIDT 
ZET2  = DEL2 
ZET2DT=  DEL20T 
F2FI  = AKF1«ZET1 
F2F2  3 AKF2*ZET2 
F3F1  = 144,0 
F3F2  = 172.3 

SIP  = AUXRL1-F3F1-F2F1-F1F1*ANTI1 
S2P  = AUXRL2-F3F2-F2F2-F1F2*ANTI2 
Zl  3 Z1P*DEL1-RW 
Z2  * Z2P^0EL2-Rw 
VI  » V0*A<»«0-ZF<»P0  + Z1«P0 

V2  = V0-»A*R0-ZF»P0*Z2»P0 

wi  S wo-a»qo*tf«o,5«po-delidt 

W2  = WO-A*QO-TF«0.5*PO*'DEL2DT 

A005A  3-DEL2DT/100, 

A007A  s OEL2/10, 


MAIN  650 


MAINIOOO 


MAIN1080 


MAIN1970 


MAIN1990 
MAIN  810 


MAIN1660 

MAIN1670 


MAIN1680 

MAIN1690 


MAIN1020 

MAIN1030 


MAIN  770 
MAIN1190 
MAIN1200 
MAIN1390 
MAIN1400 
MAIN2060 
MAIN2070 
MAIN2120 
MAIN2130 
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A014A  = DELaOT/100. 

0007D  =-DEL2DT/100,*8ETA 
D005D  = OEL2DD/1000,*BETA 
IF  (axle.eq.I)  goto  AOO 

INDEPENDENT  REAR 


* ZET 


400 


MAIN  580 


0EL3 

= 0,25 

DEL3DT 

= 69,0 

MAIN  540 

DEL30D 

= SMP/ AMS-TR*O,5*PDTO-0*QDTO*2,/ AMUR*  (-FR3>S3»f-  YU3*,  , , 

MAIN1800 

TAN (2,*HRC/TR) ) *0 

MAINieiO 

DEL4 

= .15 

OEL4DT 

= 70,0 

MAIN  560 

DEL4DD 

* SMP/AMS*TR«0,5*PDTO-8*QDT0^2,/AMUR* (-FR4*S4*F  YU^*, , , 

MAIN1820 

TAN (2,«HRC/TR) ) *G 

MAIN1830 

F3R3 

= 642,7 

F3R4 

= 645,0 

NOT  DERIVED  FROM  INTEGRATION  OF  ZETDT 

ZET3=DEL3 

ZET3DT 

=0EL3DT 

ZET4=0EL4 

ZET4DT 

S0EL4DT 

F2R3 

s AKR3*ZET3 

F2K4 

= AKR4*ZET4 

S3P 

=-F3R3-F2R3-FlR3* (DEL4-DEL3) *RR/TR«*2*ANTI3 

S4P 

=-F3R4-F2R4-F1R4- (DEL4-DEL3) *RR/TR»*24ANTI4 

Z3 

= Z3P4DEL3-RW 

Z4 

= Z4P+0EL4-RW 

V3 

= V0-»8*H0-ZR*P0*Z3*P0 

MAIN2080 

V4 

= V0-B*R0-ZR*P0*Z4*P0 

MAIN2100 

W3 

s WO-B*QO*DEL3OT*TR*0,5*PO 

W4 

= WO*8*QO-»DEL4DT-TR*0,5*PO 

A015A 

S-DEL40T/100, 

A017A 

= DEL4/10, 

D015D 

= DEL4DO/1000.*BETA 

D017D 

=-DEL4DT/100,*BETA 

CONTINUE 

SMP 

5 SlP  ♦ S2P  ♦ S3P  ♦ S4P 

MAIN1270 

SI 

= S1P^B*AMS*G/ <2,* (A+B) ) 

MAIN1280 

S2 

= S2P*B*AMS*G/(2,*(A*8) ) 

MAIN1290 

S3 

= S3P*A»AMS*6/ (2,* (A*B) ) 

MAIN1300 

S4 

s S4P*A*AMS*6/ (2,* ( A^B) ) 

MAIN1310 

rotational  EQUATIONS 

MAIN1960 

UGi 

s UUTHE0*W1 

MAIN2180 

UG2 

= U2*THE0»W2 

MAIN2190 

UG3 

5 U3*THE0*W3 

MAIN2200 

UG4 

= U4*THE0»W4 

MAIN2210 

VGi 

s V1-PHI0*W1 

MAIN2220 

VG2 

s V2-PHI0*W2 

MAIN2230 

VG3 

= V3-PHI0*W3 

MAIN2240 

VG4 

= V4-PHI0»W4 

MAIN2250 

UGIP 

- UG1*C0S(PSI1) *VG1*SIN(PSII) 

MAIN2260 

UG2P 

= UG2*C0S  (PSI2)  ♦VG2*SIN’(PSI2) 

MAIN2270 

UG3P  = 

UG3*VG3*PSI3 

MAIN2280 

UG4P 

= UG4^VG4*PSI4 

MAIN2290 

XII 

= l,*RPSl*Zl/{UGl*C0S(PSn)*V61*SIN(PSIl) ) 

MAIN2300 

XI2 

* 1,*RPS2*Z2/(UG2*C0S(PSI2) ♦VG2«SIN(PSI2) ) 

MAIN2310 

XI3 

= 1 ,+RPS3»Z3/ (U63*V63*PSI3> 

MAIN2320 

XI4 

= 1,*RPS4*Z4/(UG4*V64*PSI4) 

MAIN2330 
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«WHEEL  SLIP 

MAIN2350 

MAIN2360 

SLIPI 

= Xll 

MAIN2370 

IF(AB5(XI1) .QT.l.)  SLIPl5SIGN(l,*Xll) 

MAIN2380 

SLIP2 

= X'I2 

MAIN2390 

IF (ABS(XI2) .6T.1.)  SL I P2  = S I GN ( 1 . t X 1 2 ) 

MAIN2400 

SLIP3 

= XI3 

MAIN2410 

IF  ( ABS  (XI3) ,6T, 1 . ) SL I P3  = S I GN ( 1 . » X 1 3 ) 

MAIN2420 

SLIP4 

= XI4 

MAIN2430 

IF  (ABS  (X  14)  .GT.  1 . ) SLIP4  = SIGN  ( 1 , »Xl<^) 

MAIN2440 

* TIRE  circumferential  FORCE 

MAIN2450 

«■ 

MAIN2460 

equations 

IN  CFRIC  PROGRAM*  INCLUDE  IN  DSL  AT  A LATER  TIME 

» UOl 

= U11-AM21 

MAIN2480 

» U02 

= U12-AM22 

MAIN2490 

* U03 

= U13-AM23 

MAIN2500 

« U04 

= U14»AM24 

MAIN2510 

AM21 

= Ull-UOl 

MAIN2520 

AM22 

= U12-U02 

MAIN2530 

AM23 

= U13-U03 

MAIN2540 

AM24 

= U14-U04 

MAIN2550 

SIl 

= UOl/ (AM11-AM21) 

MAIN2560 

SI2 

= U02/ ( AM12-AM22) 

MAIN2570 

SI3 

= U03/ ( AM13-AM23) 

MAIN2580 

SI4 

= U04/ ( AMI4-AM24) 

MAIN2590 

UIP 

= AM21*SLIPUU01 

MAIN2600 

U2P 

= AM22*SLIP2*U02 

MAIN2610 

U3P 

= AM23*SLIP3^U03 

MAIN2620 

U4P 

= AM24«SLIP4*U04 

MAIN2630 

FCl 

= -U1P«*FR1 

MAIN2640 

FC2 

= -U2P*FR2 

MAIN2650 

FC3 

= -U3P«FR3 

MAIN2660 

FC4 

= -u4p«FR4 

MAIN2670 

AIF8R 

= AIWF*AIDF*ARFBR*2,*,25 

AIFBRP 

= aifbr-aiwf 

AIBR 

= AIWR*AID»ARBR*«2*0.25 

MAIN2680 

AI6RP 

= aibr-aiwr 

MAIN2690 

RPSIDT 

= (FC1«Z1*TQFBR«LB1 ) /AIWF 

MAIN2700 

RPS2DT 

= (FC2«Z2*TQFBR*LB2) /AlwF 

MAIN2710 

RPS3DT 

=- (-FC3«Z3-TQRBR*L83*AIBRP«XPS4DT) /AIBR 

MAIN2720 

RPS4DT 

=- (-FC4»Z4-TQRBR«L84+AIBRP«RPS3DT) /AIBR 

MAIN2730 

» 

MAIN2740 

*SPARE  TIRES 

MAIN2750 

MAIN2760 

TIN 

alE-04 

MAIN2770 

MAIN2760 
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MAIN3270 


*680  POTS 


POOO 

*delidt/ioo. 

pool 

= beta/ams«sfsf*10. 

MAIN3430 

POlb 

= CFP/1000.0 

PO  16 

=OEL3/10 . 

MAIN3460 

P019 

= 2,0«CFP/10000, 

MAIN3480 

P021 

= BETA 

MA IN3490 

P022 

= CFP/IOOO. 

MAIN351 0 

P024 

= 2,0*CFP/10000. 

MAlN3b40 

P027 

= CRP/IOOO. 

MAIN3550 

P026 

= BETA 

MAlN3bbO 

P029 

= 2. 0*CRP/10000 , 

P030 

sDELl/10* 

P043 

=DEL3DT/100# 

MAIN3700 

P0'»9 

= CRP/IOOO. 

MAIN3710 

P050 

s aibrp/aibr 

MAIN3750 

POS^ 

= 2.0<»CRP/10000  . 

MAIN3760 

PObS 

= ICO.^Rif^SF/SOaO, 

MAIN3770 

PObb 

= 100.<*RWSF/3000, 

MAIN37B0 

PObe 

= 100.»RwSF/3000, 

MAIN3800 

PObO 

= lOO./AKFl 

MAIN3810 

pool 

= 100./AKF2 

MAIN3820 

P0b2 

= 100./AKR3 

MAlN3b30 

P0b3 

= 100./AKR4 

MAIN3840 

P064 

= SFSF 

MAIN3850 

PObb 

= SFSF 

MAIN3880 

P066 

= SFSF 

MAIN3890 

P0b9 

= SFSF 

MAIN3910 

P072 

= 100 »*RwSF/3000 . 

MAIN3920 

P073 

= beta 

- SF*4  • * AK T4/ 1 0 0 0 0 « / A 1 BR*0  • 1 

MAIN3930 

P063 

MAIN3940 

PObb 

= beta 

MAIN3950 

PObb 

= ,2000 

MAIN3960 

P0b7 

s 2./RWSF 

MAIN3970 

PObb 

= rw/rwsf 

MAIN4010 

P09b 

= ,2000 

MAIN4030 

P098 

= rw/rwsf 

MAIN4040 

P099 

= 2./RWSF 

MAIN4050 

PlOO 

= beta 

MAIN4060 

PlOl 

= RPSl/lOO, 

MAIN4090 

P104 

s RPS2/100, 

MAIN4100 

P105 

= BETA 

MAIN4110 

PlOb 

= ,2000 

MAIN4120 

P107 

= 2./RWSF 

MAIN4130 

PlOb 

= RW/RWSF 

MAIN4150 

PllO 

= RPS3/100, 

MAIN4160 

Pill 

s A.0/AIBR*LB4 

MAIN4170 

P112 

= 4,/AIBR*»LB3 

= rwSF«4.*AKT3/10000,/AIBR*0.1 

MAIN4180 

P113 

MAIN4190 

P114 

= RPS4/100. 

Pllb 

* ,200 

MAIN4220 

P117 

= 2./RWSF 

MAIN4230 

Pile  = RW/RWSF  MAIN4240 

P119  = aibrp/aibr 

IF(AXLE»1)  900 ♦ I 000 1 1 1 00 
SOLID  FRONT  AXLE  POTS 


900 


CONTINUE 

P002  = 8ETA/AMUF*SFSF 

P003  * TF/80. 
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1000 

* 


10 


20 


30 

1100 


poori 

= 

20.*TSF/ (2,«AIF) »BETA*SFSF*lO, 

P02b 

s 

(1./2.5)*BETA 

P032 

c 

(2,*AKT1/ ( 10000, »AMUF) ) «BETA 

P034 

;s 

6ETA/AMUF*SFSF 

P037 

X 

DEL2DT 

P03tt 

= 

A<^0EL2 

P039 

= 

,25*(ABS(RF) )/( 10000, *TSF) 

P044 

B 

,25*(ABS(RF) ) /(10000,«TSF) 

P0^7 

X 

TSF/200, 

P0b9 

s 

TSF/200, 

P066 

= 

,25«TSF/20, 

P067 

X 

,25*TSF/20, 

• 

P09b 

= 

2,»AKT2/ ( 10000.»AMUF) »BETA 

P097 

= 

TF/ao, 

P004 

X 

0. 

POOb 

X 

0, 

P006 

X 

0, 

P007 

X 

0, 

CONTINUE 

solid 

REAR  axle  pots 

P009 

X 

BETA/AMUR*SFSF 

POlO 

X 

AKT3/5000,0/AMUR*BETA 

MAIN3380 

POll 

X 

AKT4/5000,0/AMUR«BETA 

MAIN3390 

P012 

X 

BETA/AMS*SFSF*10, 

P013 

X 

BETA»SFSF/AMUR 

P015 

X 

io,*ts/air*beta*sfsf*io. 

P017 

X 

0,40<»8ETA 

MAIN3440 

P020 

X 

4,*DEL^ 

P023 

X 

0EL40T 

P026 

r 

ABS (RR) /4000,/TS*,  1 

MAIN3530 

P03b 

X 

,01*TS/2, 

MAIN3600 

P03b 

X 

TS/2/40,0 

MAIN3610 

P0<fb, 

X 

TS/2,/40, 

MAIN3670 

P046 

X 

,01«TS/2 

MAlN3b80 

P0S3 

X 

ABS (RR) /4000,/TSo, 1 

MAIN3740 

po  n 

X 

0,0 

MAIN3900 

P109 

X 

TR/2,/40, 

Pllb 

X 

TR/2,/40, 

P080 

X 

0, 

POBl 

X 

0, 

P082 

X 

0. 

IF(IDRSW-I)  10*20»20 
CONTINUE 


PObl 

= RWSF«4,*AKT1/10000,/AIWF«0,1 

MAIN3720 

P052 

= 4,0/AIWF*LB1 

MAIN3730 

P090 

= 0,0 

MAIN3980 

P091 

s 0,0 

MAIN3990 

P102 

= RWSF»4,»AKT2/10000,/AIWF«0.1 

MAIN4070 

P103 

= 4,0/AIWF«LB2 

MAIN4080 

GOTO 

30 

CONTI 

NUE 

PObl 

= RWSF»4.*AKT1/10000,/AIFBR», 1 

P0b2 

= 4,/AIFBR»LB1 

P090 

= aifbrp/aifbr 

P091 

= AIFBRP/AIFBR 

P102 

= RWSF*4,*AKT2/10000,/AIF8R*.l 

P1U3 

= 4,/AIF8H*LB2 

CONTI 

NUE 

IF (AXLE.EQ.O)  GOTO  1200 
CONTINUE 
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* 


1200 


INDEPENDENT  FRONT  AXLE  POTS 


P002 

= 2,/AMUF«0ETA<»SFSF 

P003 

= 0.0 

MAIN3310 

P004  : 

: .01»RF/TF«*2*0,1 

MAIN3320 

P005 

= 2,0»AKT2/5000.0/AMUF/1,0»BETa 

MAIN3330 

P006 

= 8ETA/AMS»SFSF*10. 

P007 

= 2./AMUF*9ETA*SFSF 

POOB 

= 0,0 

MAIN3360 

P025 

= BETA 

MAIN3520 

P032 

= 2.»AKT1/5OOO,O/AMUF«0ETA 

MAIN3580 

P034 

= 0,0 

MAIN3590 

P037 

=DEL2DT/100, 

P03B 

=DEL2/10. 

P039 

= 0,0 

MAIN3640 

P04<!» 

= 0.0 

MAIN3660 

P047 

= 0,0 

MAIN3690 

POby 

= 0.0 

MAIN3790 

P0fa6 

= 0.0 

MAIN3860 

P067 

E 0,0 

MAIN3870 

P095 

= 0,0 

MAIN4000 

P097 

= 0,0 

MAIN4020 

IF < AXLE.EQ, 1 ) OOTO  1200 

INDEPENDENT  REAR  AXLE  POTS 

POlO 

= AKT3«2,/ (5000.»AMUR) »BETA 

P012 

= beta/ams»sfsf*io. 

P013 

= 2,/AMUR*BETA«SFSF 

P017 

= BETA 

P020 

= DEL4/10. 

P023 

= DEL4DT/100. 

P071 

= (RR/(100,*TR*«2) ) 

poao 

= AKT4»2./ (5000,*AMUR)  <»BETA 

PObl 

= 2,/AMUR*BETA*SFSF 

P0B2 

= beta/ams*sfsf»io. 

P009 

= 0. 

poll 

= 0, 

P015 

s 0, 

P026 

= 0. 

P03b 

s 0 , 

P036 

= 0. 

P045 

= 0, 

P046 

= 0. 

P053 

= 0, 

P109 

= 0, 

P115 

= 0, 

CONTINUE 

POOOP 

= POOO 

POOIP 

= pool 

P002P 

= P002 

P003P 

= P003 

P004P 

= P004 

P005P 

= P005 

P006P 

= P006 

P007P 

= P007 

P008P 

s P008 

P009P 

= P009 

POlOP 

= POlO 

POllP 

= poll 

P012P 

= P012 

P013P 

e P013 
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PO  14P 

s: 

P014 

POlbP 

= 

P015 

POifaP 

P016 

P017P 

= 

P017 

POjtiP 

= 

P018 

P019P 

s 

PQ19 

PO^fOP 

= 

P020 

PO^flP 

= 

P021 

P022P 

= 

P022 

P023P 

= 

P023 

P024P 

= 

P024 

P025P 

s 

P025 

P026P 

a: 

P026 

P027P 

s 

P027 

P028P 

= 

PO20 

P029P 

= 

P029 

P030P 

= 

P030 

P031P 

P031 

P032P 

= 

P032 

P033P 

= 

P033 

P034P 

= 

P034 

P035P 

:: 

P035 

P036P 

= 

P036 

P03  7P 

P037 

P03BP 

P038 

P039P 

P039 

P043P 

= 

P043 

P044P 

r 

P044 

P045P 

= 

P045 

P046P 

P046 

P047P 

= 

P047 

P049P 

5 

P049 

PObOP 

= 

P050 

POblP 

= 

P051 

POb2P 

= 

P062 

POb3P 

P053 

POb4P 

P054 

PObbP 

= 

P055 

PObbP 

= 

P056 

P0b7P 

S 

P057 

POb8P 

= 

P058 

POb9P 

s 

P059 

PObOP 

s: 

P060 

POblP 

= 

P061 

P062P 

3 

P062 

P063P 

S 

P063 

POb4P 

s 

P064 

PObbP 

3 

P065 

PObbP 

s 

P066 

POb7P 

s 

P067 

PObbP 

3 

P068 

POb9P 

s 

P069 

P071P 

3 

P071 

P072P 

3 

P072 

P073P 

S 

P073 

P080P 

3 

P080 

P081P 

3 

P081 

POti2P 

C 

P082 

P0B3P 

3 

P083 

PObbP 

3 

P086 
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P087P 

= 

P087 

P088P 

= 

P088 

P0S>0P 

= 

P090 

POVIP 

= 

P091 

POy5P 

= 

P095 

PO'ibP 

s 

P,096 

poy?p 

= 

P097 

P098P 

= 

P098 

P099P 

= 

P099 

PIUIP 

= 

PlOl 

PI  02P 

s 

P102 

P1U3P 

= 

P103 

PI  04P 

= 

P104 

PlObP 

= 

P105 

P106P 

3 

P106 

P107P 

= 

P107 

PI  08P 

= 

P108 

P109P 

P109 

PI  lOP 

= 

PI  10 

PlllP 

s 

Pill 

PU2P 

= 

P112 

P113P 

£ 

P113 

PI  14P 

= 

PI  14 

PH5P 

S 

P115 

P115P 

= 

PI  16 

PI  17P 

= 

P117 

P118P 

= 

P118 

PI  19P 

A 

= 

P119 

terminal 

it 

DUMMY 

DE0UG(1.,O, 

CALL  PUNCH 

END 

param  axle  =1 
END 

PARAM  AXLE=  2 

END 

STOP 
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* O'  « tp 


<»UNSCALEU 


DAC  VALUES  FOR  SYSTEM  EQUATIONS 


00 


00 


700 


CONTINUE 
SOLID  FRONT 
FOR  SOLID  front 


axle*  dels  in  DSL  IS  SAME  AS  PHIF  IN  EQUATIONS 


OAC04  = (TF*,5>Z1<»DEL2)»AKT1/AIF 
DAC05  = A*OOTO*B*AMS*G/ ( A-*B) /AMUF*6 
DAC06  = - (TF*,5>ZZ«DELS) »AKT2/AIF 

DAC 07  =-PDT0* (-FYU1* {-Z1*TF*,5»DELS) -FYU2* (-Z2-TF*.5», , . 
0EL2) ♦FOTM) /AIF 
= OAC07*100. 


DAC07 
CONTINUE 
solid  REAR 
FUR  SOLID 


REAR  axle*  OEL4  IN  DSL  IS  SAME  AS  PHIR  IN  EQUATIONS 


DAC12  s (♦TR*»0.5*Z3<»DEL^)  *AKT3/AIR 
DAC13  = G'B#QDT0>A*AMS*G/ ( A<»0) /AMUR 
DAC 14  =- (TR*0.5-Z4*DEL4) *AKT4/AIR 

DAC15  = -PDTO*  (- (FYU3«*FYU4)  <»HRC*ROTm.  , . 

-FYU3#  (TR*0.5*DEL<^-Z3)  -FYU4*  (-TR«0,5*DEL4-Z4)  ) /AIR 
DAC15  = DAC15<»100. 

IF ( axle.eq.O)  goto  aoo 
CONTINUE 

independent  front 

DAC04  = 0 

DAC05  = -TF»0.5«PDTO*A*QDT04B*AMS<»G/ ( (A*B)  »AMUF)  ♦G-2,»FyU1*.  , , 
TAN  (2,<»HFC/TF)  /AMUF 

DAC06  s 0 

DAC07  = TF<»0,5»PDTO  + A*QOT04B<»AMS<»G/(  (A*B)*AMUF)^Gf2.»FYu2».,, 
TAN (2.*HFC/TF) /AMUF 
IF (AXLE.EQ. 1 ) GOTO  800 
independent  rear 

DAC12  = 0. 

DAC  13  s-TR«.5*PDT0-B*Q0T0-*A*AMS*G/AMUR/  (A^B)  *G-FYU3,  , , 


MAIN2780 

MAIN2790 


DACOO 

= -MT1/AIFQ*RDT0 

MAIN2800 

DACOl 

= rw*zf^zo-»a*theo*tf<»o,5*phio 

MAIN2810 

DAt02 

= ,-MT2/AIFW*RDT0 

MAIN2820 

DAC03 

= RW*ZF*ZQ-A*THEO-TF*0,5*PHIO 

MAIN2830 

DAC08 

= -TQFBR 

MAIN2900 

DAC09 

= -TQRBR 

MAIN2910 

DAC16 

= DELSWO/10. 

MAIN2970 

DAC17 

= RW*ZR+ZO*B*THEO*PHIO*TR»0.b 

MAIN2980 

DAC19 

= RW*ZR*ZO*B*THEO'PHIO«TR«0.5 

MAIN2990 

DAC20 

= AM23 

MAIN3000 

DAC21 

= AM24 

MAIN3010 

DAC22 

- AM21 

MAIN3020 

DAC23 

= AM22 

MAIN3030 

DAC24 

= UG1«C0S(PSI1)^VG1«SIN(PSH) 

MAIN3040 

DAC25 

= UG2»C0S (PSI2) ♦VGSttSIN (PSI2) 

MAIN3050 

DAC26 

= UG3*VG3»PSI3 

MAIN3060 

DAC28 

= UG4*VG4«PSI4 

MAIN3070 

DAC32 

= UOl 

MAIN3080 

DAC33 

= U02 

MAIN3090 

DAC34 

= U03 

MAIN3100 

DAC35 

= U04 

MAIN3110 

DAC37 

= ANTIl 

MAIN3120 

DAC38 

* ANTI2 

MAIN3130 

DAC39 

= ANTI3 

MAIN3140 

DAC40 

= ANTI4 

MAIN3150 

IF(AXLE-l)  500*600*700 

MAIN2930 


MAIN2840 

MAIN2850 

MAIN2860 

MAIN2870 

MAIN2880 

MAIN2890 


154 


OD  « 


DAC14 

(TAN  (2.«HRC/TR)  ) »2,/AMUR 
= 0, 

DAC15 

= TR».5<»PDT0-B*QDT0^A<*AMS«Q/AMUR/  (A^B)  ♦G.  , . 

lO  CONTI 

♦FYU4*(TAN(2.*HRC/TR) )*2,/AMUR 
NUE 

\ 

MAIN3240 

/ 

MAIN3250 

SCALE  t-ACTORS  FOR  D/A  CONVERTERS 

MAIN4250 

NAIN4260 

DAOO 

= DAC00/10000.*8ETA 

MAIN4270 

MAIN4280 

DAOl 

= OACOl/10. 

MAIN4290 

DA02 

s DAC02/10000,*BETA 

MAIN4300 

0A03 

s OAC03/10. 

MAIN4310 

DA04 

= DAC04/100.*BETA 

DAOb 

» DAC05/10000,*BETA 

MAIN4330 

DAU6 

= 0AC06/100.OBETA 

DA07 

= DAC07/10000,<»BETA 

MA IN4350 

DA08 

= DAC08/40000, 

MAIN4360 

DA09 

s DAC09/40000, 

MAIN4370 

0A12 

= DAC12/100,*BETA 

MAIN4380 

DA13 

= DAC13/10000,»BETA 

MAIN4390 

DAi4 

= DAC14/100.*BETA 

MAIN4400 

DA15 

= DAC15/10000,*BETA 

DA16 

= OAC16/10, 

MAIN4420 

DA17 

= DAC17/10. 

MAIN4430 

DA19 

= DAC19/10. 

MAIN44A0 

DA20 

= OAC20/(-20.) 

MAIN4450 

DA21 

s DAC21/(-20.) 

MAIN4460 

DA22 

= DAC22/(-20.) 

MAIN4470 

DA23 

s DAC23/(-20.) 

MAIN4480 

DA24 

s DAC24/1500, 

MAIN4490 

DA25 

s DAC25/1500, 

MAIN4SO0 

DA26 

= DAC26/1500, 

MAIN4510 

0A28 

= DAC28/1500. 

MAIN4520 

DA32 

= DAC32/(-2.) 

MAIN4530 

DA33 

= DAC33/(-2.) 

MAIN4540 

DA34 

* 0AC34/(-2.) 

MAIN4550 

DA35 

= DAC35/(-2.) 

MAIN4560 

DA37 

» DAC37/10000* 

MAIN4570 

DA30 

= DAC38/10000, 

MAIN4580 

DA39 

5 DAC39/10000, 

MAIN4590 

DA40 

= OAC40/10000, 

MAIN4600 

680  AMP»S 

MAIN4610 

AOOO 

s-DELIDT/100, 

MAIN4620 

AOOl 

= ZETlDT/100, 

MAIN4630 

A002 

=OEL1/10. 

MAIN4640 

A004 

s-DELl/10, 

MAIN4650 

AOOb 

= A005A 

A006 

= (SlP-S2P)/lOOO./2, 

MAIN4670 

A007 

= A007A 

A008 

= Zl»RPSl/U61P/2, 

MAIN4690 

AOiO 

=^DEL3DT/100. 

MAIN4700 

AOU 

s ZET2DT/100, 

MAIN4710 

A012 

=DEL3/10, 

MAIN4720 

A014 

= A014A 

A015 

= A015A 

A016 

=-SlP/SCALE 

MAIN4750 

A017 

= A017A 

A018 

=-Zl*RPSl/100,/RWSF 

MAIN4770 
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A019 

=S1P/SCALE 

MAIN4780 

AO^O 

=SLIPA 

MAIN4790 

AO<ei 

=-S2P/SCALE 

MAIN4BOO 

A022 

=RPS4DT/10000, 

MAIN4810 

A023 

= UlP<»FRl/AKTl/4, 

MAIN4B20 

A024' 

=S2P/SCALE 

MAIN4B30 

A026 

=-S3P/SCALE 

MAIN4B40 

A02B 

= (Zl*FRl»UlP) / (4*RWSF»AKT1 ) 

MAIN4B50 

A029 

=S3P/SCALE 

MAIN4B60 

AOJU 

=U3P/2, 

MAINI4B70 

A031 

=-F2F2/10000, 

AO  Jb 

=ZET40T/100. 

MAIN4B90 

AOJb 

S-F2R3/10000, 

A041 

=U4P/2. 

MAIN4910 

A04b 

S-F2R4/10000, 

A0^6 

=ZET3DT/100, 

MAIN4930 

A049 

* Z3/RWSF 

MAIN4940 

AObl 

=-S4P/SCALE 

MAIN4950 

AOb2 

*-DEL3/10, 

AOb3 

=-Z2«RPS2/RWSF/100. 

MAIN4960 

A054 

=S4P/1000, 

MAIN4970 

AObb 

= (S3P-S4P) /1000./2, 

MAIN4980 

AOb6 

= RPSlOT/10000, 

MAIN4990 

AOb9 

= Z4/RWSF 

MAINbOOO 

AObO 

= RPS2DT/10000. 

MAiNbOlO 

AOb2 

= AUXRLl/10000. 

MAINb020 

A063 

= (Z2<>FR2*U2P) /4./RWSF/AKT2 

MAlNb030 

AObb 

=- ( A004+A007) 

AObb 

=SMP/SCALE 

MAINbObO 

AObb 

= U2P»FR2/AKT2/4. 

A071 

=- ( A052+A017) 

AO  ^3 

= Z3*RPS3/UG3P/2. 

MAINb080 

AO  7b 

=RPS3DT/10000. 

MAINb090 

A07B 

= -Z3*»RPS3/RWSF/100. 

MAlNblOO 

AOBl 

=SLIP2 

MAINbllO 

AOB3 

= (Z3*FH3*U3P) / (AKT3«4«RWSF) 

MAIN5120 

AOB4 

= Z2/RWSF 

MAINbl30 

AOBb 

=-FR1/AKT1/2. 

MAINS140 

AOB8 

= U3P*FR3/AKT3/4, 

MAINblbO 

AOb9 

= Z1/RW5F 

MAlNblbO 

A090 

=-F2Fl/10000, 

A091 

=UlP/2. 

MAINblSO 

A092 

=SLIP3 

MAINbl90 

A093 

= Z2*RPS2/UG2P/2, 

MAINS200 

A096 

S-FR2/AKT2/2, 

MAIN5210 

AlOO 

= -’RPSl/100. 

MAINS220 

AlOl 

=SLIP1 

MAINb230 

A103 

= Z4«RPS^/UG4P/2. 

MAIN5240 

AlOb 

=-RPS2/100, 

MAIN5250 

AlOb 

=-FR3/AKT3/2. 

MAIN5260 

A108 

=-Z4*RPS4/RwsF/100, 

MAINb270 

Alio 

=-RPS3/100, 

MAINb280 

Alll 

=U2P/2. 

MAIN5290 

AlU 

= (Z4*FR4»U4P) / (AKT4«4«RWSF) 

MAINb300 

Allb 

=-RPS4/100, 

MAIN5310 

Allb 

=-FR4/AKT4/2, 

MAIN5320 

AllB 

= U4P*FR4/AKT4/4. 

MAIN5330 

0 DERIVATIVES 

MAIN5450 

DOOO 

=DEL1DD/1000.*BETA 

MAIN5460 

D002 

=-delidt/ioo,»beta 

MAINS470 
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D005 

= D005D 

0007 

= D007D 

DOlO 

=DEL3DO/1000.*BETA 

MAIN5500 

D012 

*-DEL3DT/100,*BETA 

MAIN5510 

D015 

= D015D 

DOl  7 

5 DOIJD 

DlOO 

= RPS1DT/100,0,*BETA 

MAIN5540 

D1U5 

= RPS2DT/1000.»8ETA 

MA IN5550 

DUO 

sRPS3DT/1000.*BETA 

MAINbbfcO 

DU5 

sRPS4DT/1000.*BFTA 

MAINbb70 

MAIN3230 

T040 

= ZETlOT/100, 

MAIN5360 

T041 

s ZET2DT/100. 

MAIN5370 

T043 

s ZET4DT/100, 

MAIN5380 

T04b 

= DA16 

MAIN5340 

T049 

= DAOO 

MAIN5350 

TObO 

s OA02 

MAIN5390 

T0b3 

= ZET3DT/100. 

MAIN5400 

T80 

S-F3F1/1000. 

T82 

S-F3R3/1000, 

MAIN5430 

TR3 

= -F3R4/1000, 

MAIN5440 

T88 

= -F3F2/1000, 

terminal 

MAIN3220 

« 

MAIN5580 

MAIN5590 

DUMMY 

= DEBUGd.tO.) 

MAINBbOO 

CALL 

PUNCH 

END 

PARAM 

AXLE 

= 1 

MAIN  360 

END 

PARAM 

AXLES 

2 

END 

MAIN5620 

STOP 

MAIN5630 
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0231-R  AMP»S 
o 

A2bO  =YCRDT/2U0, 

A2bl  =-YCR/3. 

A2d0  , =-DFW2DT/100. 

A261  =2,*0FW2 

A280  =-DFWlDT/100. 

A2bl  =2.*^DFW1 
A227  =-.2<»DFW2 

A228  = DFWl 

A229  = DFW2 

A230  =-F3Fl/1000, 

A231  =-F3F2/1000, 

A232  =-F3R3/1000. 

A233  =-F3R4/1000, 

A237  =-.2<>DFrtl 

A23b  =-(-MT1/AIFW  + RDTO)«>BETA/10000, 
A239  =- (-MT2/AIFW+RDT0) *BFTA/10000. 

A2A0  = -ZETIDT/100. 

A2^1  = -ZET2DT/100. 

A2A2  =-ZET3DT/100. 

A2^3  =ZET3DT/100. 

A24A  =-ZET4DT/100. 

A24b  =ZET4DT/100. 

A24?  =-A240 

A2**8  =-A241 

A2b2  = -YCRDD<»AMCR/40000  , 

A2b4  = -1.0 

A2t)2  =-2.*  (DFw2- (YCR/AA2)  ) 

A2b3  =2.<*AMSS2/AKSL2 
A2fa4  =-A263 

A270  = - (DELSWO- (ANG<»YCH)  ZAP) /lO. 

A271  = ESP/2 

A272  =- (A270*A27l<>.  100) 

A273  =-A250 

A274  = -DELSWO/10, 

A2B2  =-2,* (DFWl- (YCR/AAl ) ) 

A283  =2.0AMSS1/AKSL1 
A284  S-A283 

A292  = 20.<»EPl/2. 

A293  = 20,*EP2/2, 

* THE  following  CALCULATIONS 

* FOR  independent  machine  SETUP 

A210  = A230 

A211  = A231 

A212  = A23? 

A213  = A233 

A21b  = (MT1/AIFw*RDTO) *BETA/100000, 
A216  = DELSWO/100. 

A217  = (MT2/AIFW+RDTO) ttSETA/lOOOOO, 

A218  =-(2,<tDFWl) 

A219  = -(2,*DFW2) 


MAINJiAO 
MAIN3150 
MAIN3ibO 
MAIN3170 
MAIN3180 
MAIN3190 
MA  IN3200 
MAIN321 0 
MAIN3300 


MAIN3350 


MA IN3400 
MAIN3410 
MAIN3420 
MAIN3430 


MAIN3470 

MAIN3480 

MAIN3490 

MAIN3500 

MAIN3S20 

MAIN3530 

MAIN3540 

MAIN3550 

MAIN3560 
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derivatives 

MAIN3600 
MAIN361 O 

02b0 

= YCRDO/20000,<»BfcTA 

MAIN3620 

D2bl 

=-YCRQT/30.4BETA 

MAIN3630 

02b0 

=-DFW2DD/1000,*BETA 

MAIN3640 

D261 

= 0FW20T/b,'»BETA 

MAIN3650 

D2b0 

= -l)FWlDD/l  000  ,<»HETA 

MAIN3660 

D2bl 

= DFWlDT/b.<»BETA 

MAIN3670 

-R  POTS 

MAIN2660 

DACOO 

=-mti/aifw*rdto 

DAC16 

=OELSWO/10, 

DAC02 

=-MT2/AIFW*rdT0 

MAIN2670 

0202 

= 2,0/(20.0*AMCR)48ETA 

0204 

= 2.0/3.048ETA 

MAIN2  720 

020b 

=YCRDT/200 . 

MAIN2730 

Q20b 

=YCR/3. 

MAIN2740 

Q20b 

=OFW2DT/100, 

MAIN2760 

0209 

=2.*DFW2 

MAIN2770 

0212 

= AH2/ ( 100.Q4AIFW) «8ETA 

MAIN2600 

0214 

= AKSL2/ (A0000,0«AIFW) »BETA 

MAIN2620 

0219 

= ( AKSC^ANG/ (AP*2000,0)  ) /20, 

MAIN2860 

0222 

= AH1/<100.0*AIFW)*BETA 

MAIN2890 

0224 

= AKSLl/ {‘=»0000.04AIFW)  *BETA 

MAIN2910 

023b 

=dfwidt/ioo. 

MAIN2920 

0236 

=2,*0Fwl 

MAIN2930 

0257 

= CFCR/ (2,<»10000.  ) 

Q2bb 

= CCR/IOO.O 

MAIN2970 

0267 

= AKSL2/AA2/400000, 

0266 

=3.0/AA2 

MAIN3010 

0277  = 

: .10000 

Q2B7 

=3.0/AAl 

MAIN3060 

0266 

= AKSlI/AAI/400000. 

P21b 

= .9999<»BETA 

MAIN3090 

P217 

= ,30«ANG/ ( 10.0»AP) 

P230 

=.9999*8ETA 

MAIN3120 

P235 

= .1000 

P236 

= ,1000 

P237 

- ,1000 

the  following  calculations 

FOR  independent  MACHINE  SETUP 

P210 

= F3F1/DEL1DT/10, 

P211 

= F3F2/DEL2DT/10, 

0212 

= F3R3/ZET3DT/10, 

P213 

= F3R4/ZET4DT/10, 

0215 

=-DAC00/100000,4BETA 

0216 

= OAC16/10. 

0217 

=-OAC02/100000.«8ETA 

0218 

= 2.4DFW1 

P219 

TERMINAL 

DUMMY  = DEBUG(1,,0.) 

END 

STOP 


159 


***  DSL/91  SIMULATION  DATA  76.167  20:i?;09.5? 

TITLE  ===  PROB  52  VEHICLE  SIMULATION  === 

INCON  DFW2DT=37.  ,DFW2  =0.15  ,YCRDT  =80.  ,YCR  =2.55 
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2.  PRESENTED  HERE  IS  THE  COMPUTER  LISTING  OF  THE 
IBM  360/91  FORTRAN  DIGITAL  PROGRAM 

2.1  SUBROUTINES 
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2.1.1  MAIN 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING 
FOR  THE  MAIN  PROGRAM.  CONTROL  OF  THE 
PROGRAM  FLOW  IS  PERFORMED  IN  THIS  PROGRAM. 
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C VEHICLE  HANDLING  MODEL  C 

C MAIN  PROGRAM 

t ^***  ********************************  *********1f*’¥*  *********** 

C THIS  PROGRAM  CONTROLS  THE  PROGRAM  FLOW 

# 4n(M|(  4c  4iit(  « 4(  4i  * # 4t  4(  * 4<  4i  4i « 4< « ♦ <t>  4c  4c  ♦ * * * « * 4i  4c  4t 4(  4c  4> « ♦ ♦ * * ♦ 4e  « 4>  4<  4t  ♦ « « « « « 4c  * ♦ * )^  ♦ » * * 4:  * « * 4t 

8888  CONTINUE 

CALL  OSXNTL 
CALL  USERIN 
CALL  VHTPIC 
CALL  NITIAL 
CALL  SBPG22 
CALL  NTIAL1 
CALL  POTSET 

CALL  NTEACT (888 88, SI 000, 82000,630 00) 

1000  CONTINUE 

CALL  VHTPIC 
CALL  NITIAL 
CALL  SBPG22 
CALL  NTIAL1 
■ CALL  POTSET 

CALL  NTRAT1  (888  88,61000,82000,6  3000) 

2000  CONTINUE 

CALL  RTHON 
CALL  CMPVAR 

CALL  NTRAT2 (888 88, 61 000, 620 00, 630 00) 

3000  CONTINUE 
STOP 
END 


MAIN  10 
MAIN  10 


MAIN  30 
MAIN  40 
MAI N 50 
MAIN  60 
MAIN  70 
MAIN  80 
MAIN  90 
MAIN  100 
MAIN  110 
MAIN  120 
MAIN  130 
MAIN  140 
MAIN  150 
MAIN  160 
MAIN  170 
MAIN  180 
MAIN  190 
MAIN  200 
MAIN  210 
MAIN  220 
MAIN  230 
MAIN  240 
MAIN  250 
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2.1.2  OSXNTL 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR 

THE  OSXNTL  SUBPROGRAM.  THE  FOLLOWING  IS 

PERFORMED  IN  OSXNTL: 

1 ) Initialization  of  the  OS  options  executive 
which  includes  the  reading  of  data  cards 
for  table  and  track  variables,  ADC  and  DAC 
assignments  and  all  initial  values  for 
interactive  variables. 

2)  Communication  initialization  with  the 
hybrid  operator's  station. 
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C SOBROUTINE  OSXNTL  OSXH 

SUBROUTINE  OSXNTL  OSXN 

Q i^it‘***************i^*****************^******4‘**************************-*0SIlH 

c OSXN 

C THIS  SUBROUTINE  INITIALIZES  THE  OS  OPTIONS  EXECUTIVE  OSXN 

C INCLUDING  THE  BEADING  OF  DATA  CARDS  FOR  TABLE  AND  TRACK  VARIABLES  OSXN 

C ,ADC  AND  DAC  ASSIGNMENTS,  AND  ALL  INITIAL  OSXN 

C VALUES  FOR  INTERACTIVE  VARIABLES.  IT  ALSO  ESTABLISHES 

C COMMUNICATION  INITIALIZATION  WITH  THE  HYBRID  OPERATOR'S  STATION 

C OSXN 

Q If  i^iit^*****  **********************************************  ********OSX^i 

C ' OSXN 

QUfTif**************************  COMMON  AREAS  ♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦OSX N 
C OSXN 

COMMON/START/  ZDUHMY(4)  OSXN 

COHMON/VHTPNM/  T ABVAR, INDVAR,HRDVNT  OSXN 

COMHON/OSTRAN/  I CT , IRT, MOPU, IRUNS , IRONS, REALT, ITRUNS  OSXN 

COMHON/DACADC/  N A HD AC , N A MADC,I D AC , I ADC , ADCNUM , D ACNU M OSXN 

COMMON/TAEBS/  IT ABP, IT ABI, ITNA M , T A BNUM  OSXN 

COMHON/DEVICE/KEYBD,ITTY,ICDRD,LPTR,LPNT  OSXN 

COMMON/OS  MON/  IREALT,NNNN  OSXN 

COMMON/IO/  DACPLA, ADCPLA,SCALDC,SCALAC  OSXN 

COMMON/TRACK/.IIN,  IKEEP,  ATRACK,  ISAHP,0NTIH,0FFTIM,ITRA  , OSXN 

1 ITRA A, ITRNA  ,ITRIA  OSXN 

COMHON/UNREAD/NAMEA,IWRDCT,INUMCT,LSTART,INDEXA,  OSXN 

1 FNUMA,LAST, ILOP  OSXN 

COMHON/FIND/ORNAME  (400)  ,NCOH,RSVAL  (002) ,IORDER  (400)  OSXN 

C0MH0N/SP7BLK/N1,N2,IP0T (120) ,IPOTAD(120) , PAR AM  (400)  OSXN 

COHMON/TIMBLK/JJTIHE,TIME,DT  OSXN 

OSXN 

*********:ti************:^^i*******^i*^^l^***:^^^|^*****^^t^^^^L**^^t^i^^^:^^H^4i*lti4f*,^i*^L^t^f^^^,Q^yr 

OSXN 

REALMS  LHNAME  OSXN 

REAL*8  VEHICL  ' OSXN 

BEAL*8  TABVAR(9,7)  OSXN 

REALMS  NAMEA  (10)  OSXN 

REAL*8  ORNAME  OSXN 

REAL+8  ENDDAC,ENDADC  OSXN 

REAL*4  ZDUMMY  OSXN 

REAL*4  FNUMA(IO)  OSXN 

REALX4  SCAIAC  (48) ,SCALDC(48)  OSXN 

REALX4  IPOT,IPOTAD  OSXN 

INTEGER+4  INDEXA(IO)  OSXN 

INTEGER*4  IT  ABP  (9)  , TABN  UM,  ITNAH  (9 ) OSXN 

INTEGER*4  ITABI(9)  OSXN 

INTEGER^2  HRDVNT(9)  OSXN 

INTEGER*2  INDVAR(9,7)  OSXN 

INTEGEB*2  ITRA A (50)  ,ITR N A (50) , ITRI A (50 ) OSXN 

INTEGER*2  DACNU M, ADCNUM, DACPLA (48)  , ADCPLA  (48)  OSXN 

INTEGER*2  N A MDAC  (4  8)  , NAHADC  (48)  ,I  D AC  (48)  , I ADC  ( 48)  OSXN 

EQUIVALENCE  ( EV ALU E (1 ), ZDUMMY ( 1 ) ) OSXN 

EQUIVALENCE  (BV ALU E ( 1) , IVALUE( 1) ) OSXN 

DATA  ENDDAC/'ENDNODAC V»ENDADC/'ENDNOADC»/  OSXN 

DIMENSION  ATRACK (2000)  OSXN 

DIMENSION  BVALUE(2)  OSXN 

DIMENSION  IVALUE(2)  OSXN 

OSXN 


4c  ^ 4t )»:  « V 4c  « 4c  4ntM|e  4c  4I  « 4[ « 4t « 4(  41 4c « « 4t  * 4t  4c  * 41 4i  4c « * « 4c « « * * 4t  *]|| « 41 4c  4c « « « « # 4I  0 S X N 

OSXN 


10 

20 

30 

40 

50 

60 

70 


90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 

580 
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KEYBD=5 

OSXN 

590 

ITTY=6 

- 

OSXN 

600 

ICDRD  = 1 

OSXN 

610 

LAST=72 

OSXN 

620 

LPTR  ' =2 

OSXN 

630 

LPNT  = 0 

OSXN 

640 

CALL  TYPER2 (KETBD,ITTY,  LPNT) 

OSXN 

650 

CALL  SETUP'(TTTY,ICCBD) 

OSXN 

660 

IRT=0 

OSXN 

670 

IKEEP=0 

OSXN 

680 

JIN=0 

OSXN 

690 

TABNUM=9 

OSXN 

700 

nopu=6 

OSXN 

710 

LRUNS=0 

OSXN 

720 

IRUNS=1 

OSXN 

730 

ICT  = 0 

OSXN 

740 

LSTART=1 

OSXN 

750 

ADCNU«=48 

OSXN 

760 

DACNDM=48 

OSXN 

770 

ITRDNS=0 

OSXN 

780 

FEALT=  1. 

OSXN 

790 

ONTIM=1000.  • 

OSXN 

800 

NNNN=0 

OSXN 

810 

c 

OSXN 

820 

c 

THIS  SECTION  WRITES  THE  PROBLEM 

TITLE 

AND  LOAD  MODULE  NAME 

OSXN 

830 

c 

OSXN 

840 

WRITE  (ITTY,  1 1) 

OSXN 

850 

1 1 

FORMAT (T10, • HYBRID  VEHICLE  HANDLING 

PROGRAM') 

OSXN 

860 

PEAD(ICDRD  ,101)  NU H , LH N A M E, VE H ICL 

OSXN 

870 

101 

FORMAT (13, A8,  A8) 

OSXN 

880 

WRITE  (ITTY,  201)  NU  H,  LMN  AH E,  VEHICL 

OSXN 

890 

WRITE  (LPTR,  201)  NUM,  LMN  A ME,  VEHICL 

OSXN 

900 

201 

FORMAT  (1H0,»  HYBRID  COMPUTER  PROB#  • 

,I3/A8,*  LOAD  MODULE'/ 

OSXN 

910 

1 

A8,*  VEHICLE'//) 

OSXN 

920 

WRITE  (ITTY,  301) 

OSXN 

930 

301 

FORMAT  (1H0,*  ENGAGE  PATCH  PANEL 

FOR 

TEST') 

OSXN 

940 

WRITE  (ITTY, 401) 

OSXN 

950 

401 

F0RMAT(1H  ,'  TYPE  CR  WHEN  READY 

') 

OSXN 

960 

READ (KEYBD, 151)  LL 

OSXN 

970 

151 

FORMAT(II) 

OSXN 

980 

C 

OSX  N 

990 

Q ***i^4i*^******!i^******  ♦♦♦♦♦*♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦*♦♦♦♦♦♦♦  ♦♦♦*****OSX  N1 

000 

c 

OSXN  1C10 

c####« 

t THIS  ROUTINE  SETS  UP  TRACK 

NAME 

ARRAY 

OSXN1020 

ITRA=0 

OSXN1030 

130 

CALL  UNFORM  (ICDRD,  1) 

OSXN1040 

IF  (IWRDCT.EQ.O)  GO  TO  120 

OSXN1050 

DO  110  I=1,IWRDCT 

OSXN1060 

CALL  PINDNM  (K,J, I, 61 10) 

OSXN1070 

IF  (ITRA.GE.50)  WRITE  (ITTY, 4010) 

ORNAHE 

(J) 

OSXH1080 

IF  (ITRA.GE.50)  GO  TO  110 

OSXN1090 

4010 

FORMAT  (1H  ,' ERROR  TRACK  TABLE  EXCEEDED 

,LAST  NAME  WAS',A6) 

OSXN1 

100 

ITBA=ITRA4-1 

OSXNI 

110 

ITRAA  (ITRA)  = K 

OSXN1 

120 

ITRNA (ITRA) =J 

OSXNI 

130 

ITRI  A (ITRA)  = INDEX  A (I) 

OSXN  1 

140 

110 

CONTINUE 

OSXNI 

150 

GO  TO  130 

OSXNI 

160 

120 

CONTINUE 

OSXNI 

170 

C#««t4 

■ THIS  ROUTINE  SETS  UP  TABLE 

NAME 

ARRAY 

OSXNI 

180 

184 


DO  10101  JJ=1,7 
CALL  UNFORM (ICDRD,  1) 

TABNOM=IWRDCT 
DO  102  IL=1,TABND« 

TABVAR  (LL, JJ)  = NAHEA(LL) 

INDVAH (LL, JJ)  = INDEXA(LL) 

102  CONTINUE 

WRDVNT(JJ)  = TABNUM 
10101  CONTINUE 

C#####— - THIS  ROUTINE  SETS  UP  DAC  NAMES  & SCALING 
N = 0 

105  CALL  UNFORM (ICDRD, 1) 

IF  (NAMEA  (1)  . EQ.  ENDCAC)  GO  TO  106 
IP  (ILOP.NE.LAST)  WRITE  (ITTY  ,4000) 

IF  (IHRDCT. NE.INDMCT)  WRITE  (ITTY,4002) 

DO  9007  I=1,IWRDCT 
CALL  FINDNM (K,J,I,6105) 

N = N+1 

IF(N.GT.DACNUM)  WRITE (ITTY , 4005)  NAMEA  (I) 

4005  FORHAT(1H0,»  ERROR  ♦-DAC  ARRAY  > 48-*  LAST  VARIABLE  WAS 
IF  (N.GT.DACNUM)  GO  TO  105 


»A8) 


NAMDAC(N) 
DACPLA  (N) 
SCALDC  (N) 


= • J 
= K 

= FNUMA(I) 


9007 

106 

C#### 

108 


4008 


IDAC(N)  = INDEXA(I) 

CONTINUE 
GO  TO  105 
CONTINUE 
DACNUM  = N 

IF  (DACNUM. GE.48)  DACNUM=48 

# THIS  ROUTINE  SETS  UP  ADC  NAMES  & SCALING 

N = 0 

CALL  UNFORM  (ICDRD,  1) 

IF  (NAMEA(I)  .EQ.ENDADC)  GO  TO  109 
IF  (ILOP.  NE.  LAST)  M BITE  ( ITT  Y , 4000) 

IF  (IWRDCT. NE. INDHCT)  WRITE (ITTY, 40 02) 

DO  1269  1=1, IWRDCT 
CALL  FINDNM  (K,J, I, 6108) 

N = N + 1 

IF  (N.GT,  ADCNUM)  W R IT  E (ITTY , 400  8)  NAMEA  (I) 

FORMAT(1H0,'  ERROR  *-ADC  ARRAY  > 48-*  LAST  VARIABLE  WAS  ’,A8) 
IF (N. GT. ADCNUM)  GO  TO  108 


NAMADC  (N) 
ADCPLA  (N) 


= J 
= K 


1269 

109 


C#### 

90 


80 


lADC(N)  = INDEXA(I) 

SCALAC(N)  = FNUMA  (I) 

CONTINUE 
GO  TO  108 
CONTINUE 
ADCNUM  = N 

IF(ADCNUM. GE.48)  ADCNUM=48 

# THIS  ROUTINE  READS  IN  FLOATING  POINT  NAMES  AND  VALUES 

CALL  UNFORH (ICDRD, 1) 

IP (IWRDCT. EQ.O)  GO  TO  70 
IF  (ILOP.  NE.LAST)  W BITE  ( ITTY  , 40  00) 

IF(IWRDCT.NE.INUMCT)  WRITE  (ITTY, 4002) 

DO  80  1=1, IWRDCT 
CALL  FINDNM (K,J, I, 690) 

EVALDE(K)  = FNUMA  (I) 

CONTINUE 

.185  ' 


OSXN  1 190 
OSXH1200 
OSXN1210 
OSXN  1220 
OSXH1230 
OSXN  1240 
OSXN1250 
OSXN1260 
OSXN1270 
OSXN1280 
GSXH1290 
OSXN1 300 
OSXN1310 
OSXN1320 
OSXN1330 
OSXN1340 
OSXN1350 
OSKN1360 
OSXN1  370 
OSXN1380 
OSXN1390 
OSXN  1400 
OSXN1410 
OSKN1420 
OSXN  1430 
OSXN1 440 
OSXN1450 
OSXN1460 
OSXN  1470 
OSXN1 480 
OSXNl 490 
OSXN1500 
OSXN1510 
OSXN  1520 
OSXN1530 
OSXN1540 
OSXN1550 
OSXN1560 
OSXN1570 
OSXN1580 
OSXN1590 
OSXN  1600 
OSXN1610 
OSXN  1620 
OSXN1630 
OSXN1640 
OSXN1650 
OSXN1660 
OSXH167C 
OSXNl 680 
OSXN169C 
♦####OSXS1700 
OSXN1710 
OSXN1720 
OSXN1730 
OSXM1740 
OSXH1750 
OSXN1760 
OSXN1770 
OSXN1780 


V 


GO  TO  90 

70  CONTINUE 

C##### THIS  ROUTINE  BEADS  IN  FIX  POINT  NAMES  AND  VALUES  ##### 

91  CALL  UNFORM (ICDRD,  1) 

IF  (IHRDCT. EQ.O)  GO  TO  71 
IF  (ILOP.NE.LAST)  HRITE (ITTY,4000) 

IF (INRDCT.NE.INUHCT)  WRITE  (ITTY,4002) 

CO  81  I=1,IWRDCT 
CALL  FINDNM (K, J,I, 691) 

IVALUE(K)  = IFIX  (FHUMA(I)  ) 

81  CONTINUE 
GO  TO  91 

71  CONTINUE 

4000  FORMAT(1HO,*  MAXIMUM  10  PAIRS  PER  DATA  CARD  - COLUMNS  1 THRU  72') 
4002  FORMAT(1H0,*  DATA  MUST  BE  ENTERED  IN  PAIRS  - NAME  AND  VALUE') 

810  CONTINUE 
C 

(7  4c4t4c4c*4i4c«4Mtr4i4i4c«:(c4ii|i 

C ♦ ♦ 

C ♦ INITIALIZATION  PASS  ♦ 

C * ♦ 

Q :¥**'******* 

C 

DO  1701  1=1,120 
IPOT  (I)  = 100000. 

IPOTAD  (I) =100000 . 

1701  CONTINUE 
C 

CALL  SACN  ( 1,  ISACNE) 

CALL  S AMO  (1 , ISAMOE) 

CALL  SLMO { 3,ISLHOE) 

CALL  S LMO  (1  , ISLMOE) 

C 

RETURN 

END 


OSXN1790 
OSXN1800 
OSXN1810 
OSXN1820 
OSXN1830 
OSXN1840 
OSXN1850 
OSXN1860 
OSXN1870 
OSXN1 880 
OSXN1 890 
OSXN1900 
OSXN1910 
OSXN  1920 
OSXN1930 
OSXN1940 
OSXN  1950 
OSXN1960 
OSXN  1 970 
OSXN1980 
OSXN1990 
OSXN2000 
OSXN2010 
OSXN202C 
OSXN2030 
OSXN2040 
OSXN2050 
OSXN2060 
OSXN207C 
OSXN2080 
OSXN2090 
OSXN2100 
OSXN 2 110 
CSXN2120 
OSXN2130 
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2.1.3  USERIN 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
USERIN  SUBPROGRAM.  THE  FOLLOWING  IS  PERFORMED: 

Reading  of  data  cards  for  vehicle  functions  and 
parameters . 


■r , 

(4?  •'  ■ >" ! o r W -♦  li  ’ 1 « 

i.pai  .tvi'ji. , ^ , 

8«;l 

,'i  1 J ■’ .' 

• ak. 


■ -.  4 r;. 

f I 

. f ,> 

•r  -0^ 


: ffl 


«n/: 


\ A 


% 


'.tO  ■ 


n o 


C 


SDBRODTINE 

SUBROUTINE 


USEEIN 

USERIN 


USER 

USER 


10 

20 


4n«c  itc  #)((  4:  *#*«♦««**««*♦*♦  4^  **  ««  4t  >l>  ♦ <c ««  « 4i  ♦ 4c  4>  4i  « 4c 

THIS  SUBPROGRAS  READS  DATA  CARDS  FOR  VEHICLE  FUNCTIONS 
AND  PARAHETEHS 

0 4e  4c  4c  4>  4<  4<  4c  4<  4<  4c  4>  * 4>  4c  4>  4c  4c  4>  4c  4c  4c  4c  4c  4<  4c « 4c  4c  4c « 4c  4c « 4c  4c  * 4c  4<  4i  * 4<  4c  41 4> « 4>  * 4< « « « 4>  * 4<  4>  4c  4c  4c  4c  4c « * 4c  4c  4c  4c  4>  4t  4c  4< 
COKMON/VHTPDT/  PARHNO, V HTPAR 
C0Mt10N/DEVICE/KEVBD,ITTY,ICDRD  ,LPTR,LPNT 
COMMON/APL/  OPEN  ,RTS«  ,LDTS«  ,RBSH 

COMHON/SPRING/  DLSUS1, DLSUS2, DLSUS3, DLSUS4,DELSP1  (10)  ,DELSF2(10)  , 
1DELSR3{10)  ,DELSR4(10)  ,FDLSF1(10) ,FDLSF2(10)  ,FDLSR3(10)  ,FDLSR4  (10)  , 
1NDELF1,NDELF2,NDELE3^NDELR4 
COHMON/AROTBS/  T AU  (20)  , CX  (20)  , CY(20)  ,CZ  (20)  ,CL  (20)  , 

1CM  (20)  ,CN  (20)  , ALPHA (20)  ,DELCX (20)  , NCX , NCY , NC2 , 

1NCL, NCM,NCN,NDCX,XWP(20)  ,VYHTB  (20)  ,NHP 
COMHO N/NEMTBS/TOBF  (20) , PBF( 20)  ,TQBR (20)  ,PBR  (20)  r 
1AFA(20) ,GAHF(20) ,NTP,NTR,NFA 
COMMON/SP7BLK/N1 ,N2, IPOT (120)  , IPOTAD(120)  , PAR  AM  (400) 

COMHON/SOLDAX/  PHIFNT (07) ,THEFNT(07) , 

1 PSIFNT  (7)  ,PHIRR  (7)  ,THERR  (7)  , PSIRR  (7) 

COMHON/ALPHA/ALPH (20) 

REALX'4  VHTPAR(27,7) 

IN.TEGER4C4  P A RHNO  (2  7)  , Nil  MPRM/27/ 

INTEGER4<2  OP  EN  , R TS  8 , LOTS  W , RBS» 

RBSW  = 0 

OPEN  = 0 

BTSW=1 
N1=295 
N2=119 

3333  FORMAT  (20  A4) 

READ(ICDRD,  3333)  (ALPH(I)  ,1  = 1,20) 

READ(ICDRD,  900)  (PHIFNT  (I)  ,1  = 1 ,7) 

READ(ICDRD,  900)  (THEFNT(I)  ,1  = 1,7) 

READ(ICDRD,900)  (PSIFNT  (I)  ,1=1  , 7) 

READ(ICDRD,900)  ( PHIRR (I) , 1= 1 , 7 ) 

READ  (ICDRD, 900)  (THERH  (I)  , 1 = 1, 7) 

READ(ICDRD,900)  (PS  IRE  (I ) ,I  = 1 ,7 ) 

NTF=1 

200  READ  (ICDRD,  900)  PBF  (NTF)  ,TQBF  ( NTF) 

IF(PBF(NTF) .GE. 99999.0) GO  TO  210 
NTF=NTF+1 
GO  TO  200 
210  NTF=NTF-1 
NTR  = 1 

220  READ(I  CDRD,900)  PBR  (NTR)  ,TQBR  ( NTR) 

IF(PBE  (NTR)  .GE.  99999.0) GO  TO  230 
NTR=NTB+1 
GO  TO  220 
230  NTR=NTR-1 
NFA=1 

280  READ (ICDRD, 900)  GAMP (NFA)  ,AFA  (NFA) 

IF  (GAMP  (NPA)  .GE. 99999.0)  GO  TO  290 
NFA=NPA+1 
GO  TO  280 
290  NFA=NPA“1 
NCX=1 

240  READ(ICDRD,900)  TA  C (NCX)  ,CX  (HCX) 

IF  (TAU  (NCX)  . GE.  99999.)  GO  TO  241 

NCX  = NCX  + 1 ' -jgg 


USER 

30 

USER 

40 

USER 

50 

USER 

80 

USER 

90 

USER 

ICC 

USER 

110 

USER 

120 

USER 

130 

USER 

140 

USER 

150 

USE  E 

160 

USER 

170 

USER 

180 

USER 

190 

USER 

2C0 

USER 

210 

USEE 

220 

USER 

230 

USER 

240 

USER 

250 

USER 

260 

USER 

270 

USER 

280 

USER 

290 

USER 

300 

USER 

310 

USER 

320 

USER 

330 

USER 

340 

USER 

350 

USER 

360 

USER 

370 

USER 

380 

USER 

390 

USER 

400 

USER 

410 

USER 

4 20 

USER 

430 

USER 

440 

USER 

450 

USER 

460 

USER 

470 

USER 

480 

USER 

490 

USER 

500 

USER 

510 

USER 

520 

USER 

530 

USER 

540 

V 


GO  TO  240 

241  NCX=  NCX-1 
NCT=1 

242  PEXD(ICDRD,900)  T AO  {NCY ) , CY  (HCY) 

IF  (TAU  (NCY)  .GE. 99999.)  GO  TO  243 
NCY=  NCY^I 

GO  TO  242 

243  NCY=  NCY-1 
NCZ  = 1 

244  READ  (ICDRD, 900)  TAU  (NCZ)  , CZ  (NCZ) 

IF  (TAO  (NCZ)  .GE.  99999.)  GO  TO  245 
NCZ=  NCZ+1 

GO  TO  244 

245  NCZ=  NCZ-1 
NCL=1 

246  READ  (ICDRD,  900)  TA  0 (NCL)  L (NC 1) 

IF  (TAG  {NCL)  . GE.  99999.)  GO  TO  247 
NCL=NCL+1 

GO  TO  246 

247  NCL=  NCL-1 
NCM  = 1 

248  READ  (I  CDRD,900)  T A 0 ( NCM)  , CM  (NCH) 

IF(TAU(NC«) .GE. 99999.)  GO  TO  249 
NCn=  NCH+1 

go'  to  248 

249  RCn=  NCM-1 
NCN  = 1 

250  READ  (ICDRD, 909)  TAU  (NCN)  , CN  (NCN) 

IF (TAU  (NCN)  .GE.  99999.)  GO  TO  251 
NCN=  NCN41 

GO  TO  250 

251  NCN=  NCN-1 
NDCX=1 

252  READ(ICDRD,900)  AL  PHA  (NDCX)  ,DE  LCX  ( NDCX) 

IF  (ALPHA (NDCX) . GE.  99999 .)  GOTO  253 
NDCX=  NDCX+1 

GO  TO  252 

253  NDCX  =NDCX-1 
NDELFI  = 1 

300  READ (ICDRD, 900)  DELSF1 (NDELF1)  , F DLSF 1 ( NDELF 1) 
IF(DELSF1 (NDELFI) .GE. 99999.)  GOTO  310 

NDELFI  = NDELFI  + 1 
GO  TO  300 

310  NDELFI  = NDELFI  - 1 
NDELF2  = 1 

301  READ (ICDRD, 900)  DELS F2 ( N DEL F2)  , FCLSF2 (NDELP2) 

IF (DELSF2 (NDELF2) .GE. 99999.)  GOTO  311 

NDELF2  = NDELF2  ♦ 1 
GO  TO  301 

311  NDELF2  = NDELF2  - 1 
NDELR3  = 1 

302  READ  (ICDRD,  900)  DELSR3  ( NDELR3)  , FDLS R3  ( NDELR 3) 
IF(DELSB3(ND£LR3) .GE. 99999.)  GO  TO  312 

NDELR3  = NDELR3  + 1 
GO  TO  302 

312  NDELR3  = NDELR3  - 1 
NDELR 4 = 1 

303  READ (I  CORD, 900)  DELS R4 ( NDELR4)  , FDLSR4 (NDELR4) 
IF  (DELSR4 (NDELR4)  .GE. 99999.)  GOTO  313 

^ NDELR4  = NDELR4  * 1 


USER  550 
USER  560 
USER  570 
USER  580 
USER  590 
USER  600 
USER  610 
USER  620 
USER  630 
USER  640 
USER  650 
USER  660 
USER  670 
USER  680 
USER  690 
USER  700 
USER  710 
USER  720 
USER  73C 
USER  740 
USER  750 
USER  760 
USER  770 
USER  780 
USER  790 
USER  800 
USER  010 
USER  820 
USER  830 
USER  840 
USER  850 
USER  860 
USER  870 
USER  080 
USER  890 
USER  900 
USER  910 
USER  920 
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GO  TO  303 

313  NDELP4  = NDELB4  - 1 
NBP=1 

340  READ(ICDRD,900)  XSP  (NWP)  ,VIHTB(NWP) 

IF  (XWP  (KHP)  . GE.  99999.)  GO  TO  350 
NHP=NBP+1 
GO  TO  340 
350  NHP=NWP-1 

900  FORHAT (7E10.0) 

BEAD  (ICDRD,  100).  (PARMNO  (J)  , (VHTPAR  {J,I)  ,1=1,7)  , J=1,N0SPRH) 
100  FORHAT (13, 1X,7F10.3) 

ENTRY  DSERN2 
DO  1028  1=1,500 

READ(ICDRD,50,END=32)  NOPARH,PARVAl 
50  FORHAT  (13 , 1 X,G20 . 6) 

IF(NOPARH.EQ.304)  GO  TO  2222 
1100  PAFA«(NOPARH)=PARVAl 
1C28  CONTINUE 
32  WRITE  (ITTY,  33) 

33  FORMAT  (•  END  OF  CARDS*) 

2222  CONTINUE 
RETURN 
END 


OSER1050 
OSER1C60 
USER1070 
USER1080 
USER1090 
USEB1 100 
OSER11 10 
DSER1 120 
USERI 130 
USE  R1 140 
USERI 150 
USER  1 160 
USERI 170 
USER1 180 
USER1190 
USER1200 
USER1210 
OSEP1220 
USER1230 
USER1240 
USER1250 
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2.1.4 

VHTPIC 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
VHTP  INITIALIZATION  SUBPROGRAM.  THE  APPROPRIATE 
ELEMENTS  OF  THE  PARAM  ARRAY  ARE  INITIALIZED  IN 
VHTPIC  FOR  PERFORMANCE  OF  THE  SELECTED  VHTP. 
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C SDBROOTINE  VHTPIC  - VHTP  10 

SOBROOTINE  VHTPIC  VHTP  20 

THE  APPROPRIATE  ELEMENTS  OF  THE  PARAH  ARRAY  ARB  INITIALIZED  IN 
VHTPIC  FOR  PERFORMANCE  OF  THE  SELECTED  VHTP  MANEOVER 

**********************^1***’^***  ****************  ******** 


COMMON/VHTPDT/  PAHMNO, VHTPAR 

VHTP 

40 

COMHON/TABBS/  IT  ABP,  ITABI,  ITNAM  ,TABNtJH 

VHTP 

50 

COHMON/VHT  PNM/  T ABV AR, I NDVAB, H RDVNT 

VHTP 

60 

COMHON/SP7BLK/N1 ,N2,IPOT (12  0)  ,IPOTAD(120)  , PAR  AM  (400) 

VHTP 

70 

COMMON/DNREAB/NAMEA, IWRDCT, INO MCT, LSTART , INDEXA , 

VHTP 

80 

1 FNDMA,LAST,ILOP 

VHTP 

90 

REAL*8  NAMEA (10) 

VHTP 

100 

FEAL*8  TABVAR  (9  ,1) 

VHTP 

110 

REAL*4  VHTPAR(27,7) 

VHTP 

120 

INTEGER*4  INDEXA(IO) 

VHTP 

130 

INTEGER*4  PARHNO  (27)  , SAVE/9/, NOBPRH/27/ 

VHTP 

140 

INTEGER*4  ITABI (9) 

VHTP 

150 

INTEGER*4  ITABP(9) ,TABNUM, ITNAH (9) 

VHTP 

160 

INTEGER^2  TNDVAR(9,7) 

VHTP 

170 

INTEGEB*2  HRDVNT(9) 

VHTP 

180 

IF  (SAVE.E'Q.PARAM  (1  29)  ) GO  TO  500 

VHTP 

190 

I = IFIX (P AR AH (129) ) + 1 

VHTP 

200 

IF  (I.  EQ.  1)  GO  TO  10 

VHTP 

210 

IF((I.GE.2)  .AND.  (SAVE.NE.1) ) GOTO  10 

VHTP 

220 

IF  I = 1 ORIGINAL  DATA  MUST  BE  RESTORED 

VHTP 

230 

IF  IIS  NOT  = 1 MOST  DECIDE  TO  STORE  DATA 

VHTP 

240 

IF  I NE  1 AND  OLD  I NE  1 DO  NOT  STORE 

VHTP 

250 

DO  20  J=1,NnHPRH 

VHTP 

260 

VHTPAR(J,1)  = PARAB(PARMNO(J)) 

VHTP 

270 

20 

CONTINUE 

VHTP 

280 

10 

CONTINUE 

VHTP 

290 

DO  30  J=1,NUMPR« 

VHTP 

300 

PARAM  (PARMNO  (J)  ) = VHTPAR  (J, I) 

VHTP 

310 

30 

CONTINUE 

VHTP 

320 

IF  (PARAM  (129)  .EQ.4)  PARAM  (1  14)  =PA R AM  (4  2)  ♦ ( ( PA  R AM  (6)  <•?  ARAM  (7 ) ) ) /60 

.VHTP 

330 

IF  (PARAH  (129)  .EQ.5)  PARAM  (123)  =66  . * (PA  RAM  (6 ) +-PARAM  (7)  ) ♦PAR  AM  (42) 

VHTP 

340 

1 / (PARAH  (66)  *88  .) 

VHTP 

350 

IF  (PARAH  ( 129)  .EQ.6)  PAR  AH  (1  23)  = PARAM  (4  2)  * (PARAM  (6)  +PARAM  (7)  ) 

VHTP 

360 

' 

1 / 7.5 

VHTP 

370 

SELECTS  VARIABLES  FOB  TABLE  OUTPUT 

VHTP 

380 

I=IFIX (PARAM (129) ) 

VHTP 

390 

IF(I.EQ.O)  1=7 

VHTP 

400 

TABNUM  = WRDVNT(I) 

VHTP 

410 

DO  40  J=1, TABNUM 

VHTP 

420 

NAMEA  (J)  = TABVAR  (J,I) 

VHTP 

430 

INDEXA(J)  = INDVAR(J,I) 

VHTP 

440 

40 

CONTINUE 

VHTP 

450 

DO  100  1=1, TABNUM 

VHTP 

460 

CALL  FINDNM (K,J,I,5100) 

VHTP 

470 

ITABI  (I)  =INDEXA  (I) 

VHTP 

430 

ITNAH  (I) =J 

VHTP 

490 

ITABP  (I)  =K 

VHTP 

500 

100 

CONTINUE 

VHTP 

510  ■ 

500 

CONTINUE 

VHTP 

520  • 

SAVE  = PARAH (129) 

VHTP 

530; 

BETUHN 

VHTP 

540’ 

END 

VHTP 

550{ 

195 

/ 

i 

1 


t 


Of 

PC 


ft  t-‘<  f 
irfif 


Of 

ithv  u. 

f?'ri  V 

0 

O' 

■^IHV 

'IJXV 

u? 

'<iTuy 

rtfji 

<)  »'HV 

O'  ' 

•i.  :Yi 

\yy 

:,TMv . 

ti' 

■ t»v 

K' ' f 

■ T’HW 

O'-J 

1,  '.  ^■■ 

OtJ" 

" ‘k'-f 

l>‘  r 

9-Vt?' 

»;fi  r 

1 y. 

i TKV' 

i-  ■• 

1 / f» ' 

:ntn^  5:»<irppaesf2^® 

^ It  'w  jTA*#*Aiw  w*«  * ♦ v.*« «<r!9 »»*«>«- « «r«-»j  t v**‘^;--. 

^ HOi^« aa i t T a ^ ^ a'’\b« flit T\Mb^noc^^■ ' ^ j 

I (J  0 n A <14^^  . 10%  H 0 A 7m  T » (bf  r ^ t OT I , !t » . ? 4 Jb  r 00 

, A t$n^  I . v.gAra*?  * ionmr  mTm  t«%i 


< 


0' : 
c 

CJ'  . 
o;i 
bt'‘- 

OK 

per 

i)i', 
0.  ' 
Q&: 
(J^’  1 
Oi!C 
p-s>\ 
■;c.*u 

..  -i 


:<  (’  '• 
•«  r;;  7 

'i'  V 
, T .;^<4 
,'t  'VI  ^ til 
' 

4 >r  I < 1 

■mi 

'.( r?»i .. 

' ',  I IV 

" f«n> 


'n  ti  V 


■;v 


Lj;«M 

tN' 

?0f 
■'t . 


kc 

ripp 

05^ 


-t  r .. 

(,  V 


^■Wl^ai0?'>4aK4*  8*^J13».v  ‘ 1 


■W%**  P- 

(f  V r'5  f fi  4b  t Hv  1*^  i/.  »«■  f Wt* 

- (0  - 
■^;t-:  vAf. s \€s^v  I t;lc lj  6ini»4«r'''4i ' 

‘ (f)i4W,,  ,4**ir»KttTiiCr  _ _ 

(t,^rafroin 

} tfiffi  t «■  3 93f  j»  T ' ■■'t 


1 


I.*'  « 


m 


.?‘  'pit  m i?A»4b,b3vav.AB)btJ,%>-  ■ 

',  t>  f b 1- . >bii' jf4  r .0^ , b 

M t3»  Ifr 

T«o?i'  ATi.:i  ,J4Ki»t«Q»  f ‘•:  X \t  ' ' 

. rsil?!;  ^ » Xfi'fW' ’^5  '■.'^  ' 

' i«  t o4[i(j  a»4'' Madrvt  ^ 


-l4'> 


•i  i 1/ 

^ T H * 

't 

^Ki 

I ; V 

•XU? 

r;.v 

' vy' . 

'.■  I y\f’ 
'-'ft''* 

•\  T 
<1.* 

XTK'' 
'f  'FhA 
' ' T )i . • 

.;  V-  - \ ft 

ii'flv 

?’iii' 

•I  i'W  t 

>iTJ|Y 


;iS 

c.f  set 

jsoTf:  od  r 

, ^*l  b?  od- 

? f L V *'  XiiAH  • U « I* ! P 4 btnf^ 

'umiTwooMOS  '^'1 

Of 

01  6«'  " 

% ' 'i  ♦ ’f*  \ Tr^T 

tmr'i^'  nxH^-  Ho^r 


1.’ 


not 


- — 1.,4  n ■-■■»  >4|4«.  ■•  n<'«^  *1 

' 4A  *t  W '. . ' 


nx  (G  <Qi  . l)  XX 
fTXT«Y«8i<  fc-  »»Wi48iT 

.tmsAf.i-i  ='t*i,w4i  oa 
. ►'  X ,HATf  42«l» 

<x*y  vA^^iii:'  P .,(^^1  X3f!raii’ 

' ■„  ^fr  ant  iTtooi' Oj!* 
it%sftt4T,'r*5L  i^5i'fr;oa:i 
;«4’o " 

( n ii»  w,*  (0 1 3-4Ttv7'’b 

-■  MT-f 

f-H  xam*' 

■ II  srrwn'jif>o  oor 

H'^a'ifnab  002  -4. 


-t-'  ' .«.  s ;,  . ^ if. 

‘ - . /-.  A ■ . w . -.r  ■ '-^  ^hiHi 

fcwai  I.  Ji-i  ■■  ■ 


'i  i-  ' „ , ^ 


THE  JOHNS  HOPKINS  UNIVERSITY 
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2.1.5  NITIAL 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
INITIALIZATION  SUBPROGRAM.  THE  FOLLOWING  IS 
PERFORMED  IN  NITIAL; 

1)  Calculation  of  initial  conditions  using 
input  data. 

2)  Initialization  of  digital-to-analog  con- 
verters to  their  time  = 0 values . 
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SUBROUTINE 

NITIAL 

NITI 

10 

SUBROUTINE 

NITIAL 

NITI 

20 

*************  *’*^***  *****************  *****************i*  ******** 

C THIS  SUBPBOGRAH  CALCULATES  INITIAL  CONDITIONS  USING  INPUT  DATA 

C AND  INITIALIZES  DIGITAL -TO- ANALOG  CONVERTEfiS  TO  THEIR 

C TIflE=0  VALUES 

(;^  4(4(41#  4<*  4'** *♦♦♦♦*♦«  ♦♦♦♦♦♦*♦«♦♦♦♦ 


DIMENSION  NAHEX  (124) , NAME  (289) 

C0MH0N/DUALS/IDULTH»NHHEEL,TIR02,T0R02,TIRT0R,VBRZBP, 

1 FXU5,FXU6,FyU5,FYU6, ALTQ5,ALT06,FSI3,FSI4,FSI5,FSI6,PPHIR 
COMHON/AERO/SFXS, SFYS,SFZS,SNTHES ,SNPHIS,SNPSIS, APLUS  B, lAERO 
common/apl/  open  ,RTSW  ,LCTSN  ,RBSW 
cohmon/device/keybd,itty,icdrd,lptr,lpnt 

COMHON/SPLTAX/  S PS R3 , S PS R4 , I AX 
COMMON/RHHH/H1, H2, H3,H4 

C0HM0N/ZILCH/TQMAXF,TQM AXe, AKTQF, AKTQR ,TQDRF, TQDRR, IDRSW 
COMMON/PTBK/AP1 , AP2, AP3 , AP4 , APS , BTCI , BTC2 
COMMON/CACATO/EPSKl,EPSK2, FEE1 , FE E2, THE1 , THE2 
COMHON/THINGS/TnAXl,THAX2,TBAX3,TQRHAX,TQFMAX, PSIHAX,0NER 
COMMON/EES/0  1,0  2,0  3, E4, E5, E6 
COMMON/ALPHA/ALPH (20) 

COHHON/COMBLK/AIXP ,SM,AI YP, AIXZP,GAH1 ,GA«2,GAB3 , AIXBR, AIYBR, 

1.  AIZBR,  A1  ,A2,  AIXZBR,  A12,  El,  E2,  E3,  DELTA,  GVI  , G V2  , GP1  , G P2  ,G  R1  , 

1 GR2,CIP,CIVP,RZF,RZR,A2T,CA20,CA23,  ANGNL,ANGNL0 

1 ,TR02,TF02,TS02,G,THRD,TWN7,R2T,RA20,RA23,ONEOA,ONEOD 

1,TSF02 

COHnON/TIHBLK/JJTIHE,TI BE,DT 

COMBO N/EFFS/ AND H, ADEN, ANUM DT, ADENDT, ANUBO, ADENO , A NOBDO , ADE NDO , 

1 ANOUT,ADOOT 

CCMBON/INOUT/  IN(32) , DACO  (48) , ISM1 ,ISW7,IPRT 

COMMON/UVW/VC,UIN 

COMBON/XYZ/  NUBBR 

COBMON/OPSM/IHSH 

C0MM0N/VARS/P,Q,R,U,V,H,X,Y,Z,THE,PHI, P3I, PO, QO,RO,UO,VO,WO,XO, 

1 Y0,Z0,THE0, PHIO, PSIO 

COMMON /SP7BLK/N1,N 2, IPOT  (12  0) ,IPOTAD(120) , PARAB  (400) 

COMBON/XBS/XE  (3  0)  , NS  (4,  30)  , DELX  (4)  ,XI  (4)  ,NNN 
C0HH0N/N0NABE/XEND,0,EXIT2 

COBMON/NEWER/TIME2  5,TIBE10-,  PSI5,PHIMAX,DSWBAX 

COMMON/COM VAR/  A XA VE,CU VR AT  , BETDM X ,CUR TBP, TIB  DEC, JUMP , DELS TR , DEL, 
1 A XI ,CURVAV,ABBTV,AYMAX,RMAX, DELBBT, DELPST,BETAHX, 


1 

TIBEBP, 

GETDL,TIBIN5, 

TSTEP  , IVHTP 

EQUIVALENCE 

1 

(PARAB(  1),ABS) 

# 

(PARAB  ( 2)  , ABUF) 

0 

(PARAB  ( 3) , AMUR) 

0 

1 

(PARAB  ( 4)  ,ZF) 

0 

(PARAB  ( 5)  ,ZR) 

0 

(PARAB  ( 6)  , A) 

0 

1 

(PARAB  ( 7),B) 

0 

(PARAB  ( 3)  ,TF) 

0 

(PARAB  ( 9) ,TR) 

0 

1 

(PARAB  (10)  ,TS) 

0 

(PARAB  (11)  ,AIX) 

0 

(PARAB  (12)  , AIY) 

0 

1 

(PARAB  (13)  ,AIZ) 

0 

(PARAM(14)  ,AIXZ) 

0 

(PARAB  (15) , AIR) 

f 

1 

(PARAB  (16)  ,CF) 

0 

(PARAB  (17  ) ,EF) 

0 

1 

(PARAB  (19)  , AKF1) 

0 

(PARAB  (20)  ,AKF2) 

0 

(PARAB  (21)  ,AKR3) 

0 

1 

(PARAB  (22)  ,AKR4) 

0 

(PARAB  (23)  ,CR) 

0 

(PARAB  (24)  , RR) 

0 

1 

(PARAB (25) ,CF1P) 

0 

(PARAB  (26)  ,CF2P) 

0 

(PARAB  (27)  ,CB3P) 

0 

1 

(PARAB  (28)  ,CR4P) 

0 

(PARAB  (30)  , AKRS) 

0 

1 

(PARAB  (31)  ,RW) 

0 

(PARAB  (33)  ,OT) 

0 

1 

(PARAB  (34)  ,CA0) 

0 

(PARAB  (35)  ,CA1) 

0 

(PARAB  (36)  ,CA2) 

0 

1 

(PARAB  (37)  ,CA3) 

0 

(PARAB  (38)  ,CA4) 

0 

(PARAB  (39)  , TIE  ) 

0 

1 

(PARAB  (44)  , AKDL) 

0 

(PARAB  (41)  ,AKSC) 

0 

(PARAB  (42)  , ANG) 

0 

1 

(PARAB  (43)  ,iG) 

0 

(PARAB  (40)  ,T0R  ) 

0 

(PARAB  (45) , AKSL) 

EQUIVALENCE 


NITI 

40 

NITI 

50 

NITI 

60 

NITI 

70 

NITI 

80 

NITI 

90 

NITI 

100 

NITI 

110 

NITI 

120 

NITI 

130 

NITI 

140 

NITI 

150 

NITI 

160 

NITI 

170 

NITI 

180 

NITI 

190 

NTT  I 

200 

NITI 

210 

NITI 

220 

NITI 

230 

NITI 

240 

NITI 

250 

NITI 

260 

NITI 

270 

NITI 

280 

NITI 

290 

NITI 

300 

NITI 

310 

NITI 

320 

NITI 

330 

NITI 

340 

NITI 

350 

NITI 

360 

NITI 

370 

NITI 

380 

NITI 

390 

NITI 

400 

NITI 

410 

NITI 

420 

NITI 

430 

NITI 

440 

NITI 

450 

BODE 

890 

BODE 

910 

BODE 

900 

BODE 

920 

NITI 

500 

NITI 

510 

NITI 

520 

NITI 

530 

NITI 

540 

NITI 

550 

199 


\ 


(PARAH (46) ,ANL1) 
(PARAM  (49)  ,AIMF) 
(PARAH  (52) ,ARBR) 
(PARAH  (55) ,PTBR) 
(PARAH  (58)  ,YHS1) 
(PARAH(61),  AIDF) 
(PARAH  (64)  ,QIN) 
(PARAH  (67)  ,VIN) 
(PARAH  (70)  ,YIN) 
(PARAH  (73) ,PHIIN) 
(PARAH  (76)  ,TEND) 
(PARAH  (79)  , AKT3) 
(PARAH  (82)  ,RPS2) 
(PARAH  (85)  ,B1) 
EQUIVALENCE 
1 (PARAM  (88)  ,B4)  , 

1 (PARAH(  91) ,DEL3DN) 


, (PARAH  (47)  ,AIFi)  , 

, (PARAH  (50)  ,AIWR)  , 

, (PARAH  (53)  ,TSF  ) , 

, (PARAH  (56)  ,YSA  1)  , 

, (PARAH (59)  ,YHS2)  , 

, (PARAM  (62)  ,ARFBR)  , 

, (PARAM (65) ,RIN)  , 

, (PARAH  (68)  , WIN)  , 

, (PARAH  (71  ) ,ZIN)  , 

, (PARAH  (74)  ,PSIIN)  , 

, (PARAM  (77)  ,AKT1)  , 

, (PARAH  (80)  ,AKT4)  , 

, (PARAM  (83)  ,RPS3)  , 

, (PARAH  (86  ) ,B2)  , 

(PARAH  ( 89) ,DEL1 DN) 
(PARAH  ( 92)  , EELFIN) , 


(PARAM  (48)  ,AIF) 
(PARAH  (51)  ,AID) 
(PARAH(54)  , ARFS) 
(PARAH  (57)  , YSA2) 
(PARAH  (60) , AKD) 
(PARAH  (63)  , PIN) 
(PARAH  (66)  , UIZ) 
(PARAM (69) ,XIN) 
(PARAH  (72)  ,THEIN) 
(PARAM  (75)  ,DTIN) 
(PARAH  (78)  , AKT2)  , 
(PARAH  (81)  ,RPS1)  , 
(PARAM  (84)  ,RPS4) 
(PARAM  (87)  , B3) 

, (PARAH ( 90) , DEL2DN) 

(PARAM  ( 93)  ,DELRIN)  , 


1 

(P 

ARAM 

( 94) 

, DEL 

3IN)  , 

(PA 

RAM  ( 

95) 

rPHIDN) 

$ 

(PARAH 

(96)  , 

PHI 

RN)  , 

1 

(P 

ARAM 

( 97) 

,DFW 

1IN)  , 

(PA 

RAH  ( 

98) 

,DFW2IN 

) r 

(P 

ARAM 

( 99) 

,U1 

PIN) 

1 

(P 

ARAM 

(100) 

,U2P 

IN)  , 

(PARAH  ( 

10  1) 

,U3PIN) 

f 

(P 

ARAM 

(102) 

,U4PIN) 

1 

(P 

ARAM 

(103) 

,S1P 

IN)  , 

(PA 

RAM  ( 

104) 

, S2PIN) 

r 

(P 

ARAM 

(105) 

,S3 

PIN) 

1 

(P 

ARAM 

(106) 

, S4P 

IN)  , 

(PAR 

AM  (1 

07)  , 

PPRT)  , ( 

PARA 

M (10 

9)  ,RM 

SF) 

1 

, (PAR 

AH  (1 

10)'  ,TQHAX 

) r (PA 

RAM  ( 

111) 

,AKTQ)  , (PAR 

AH 

(1 

12)  , 

VCIN) 

1 

r (PAR 

AM  (1 

13)  ,S 

WMT) 

r (PAR 

AH  (1 

14)  , 

DSWCM)  , (PAR 

AM 

(1 

13)  , 

TST)  , 

1 

(PARAM  (1  1 

6)  , DSLF)  , 

(PARA 

H (1  1 

7)  , CGAH) 

, (PARAM 

(1 

18)  ,CS) 

1 , (PARAM  (119)  ,TQRBR)  , (PARAH  (120)  ,TQFBR) 

1 ,(PAPAM(121),  PPL)  , (PARAH  ( 122)  ,TTD)  , (PARAM  (123) 

1 , (PARAH  (124)  ,TS«) 

EQUIVALENCE 


DSM) 


(PARAH  ( 130)  ,AMCR)  , (PARAH  (131  ) ,ESP)  , (PARAH  (1  3 2)  , AK3L1) 
(PARAM  (133)  ,AKSL2)  , (PARAM  (13  4)  , AA1 ) 

(PARAM  (136)  ,CCR)  , (PARAH  (137)  ,CFCR)  , 


, (PARAH(135) ,AA2) 
(PARAH  (138)  ,AP)  , 


(PARAH  (140)  ,EP2)  , (PARAM  (141)  ,ERR1)  , 
(PARAH  (144)  , AH  L2)  , (PARAH(145)  ,RRIM) 


(PARAH  (285)  ,HRC) 

(PARAM  (291 ) ,HA0) , 
(PARAH  (294)  ,RA3)  , 


(PARAH  (292)  ,RA1)  , 
(PARAM  (295)  ,RA4) 


(PARAM  (1  39)  »EP1)  , 

(PARAH  (142)  ,ERR2) 

(PARAM  (143)  ,AML1) 

(PARAH  (146)  , RWR) 

EQUIVALENCE 
1 (PARAM  (284)  , HFC) 

EQUIVALENCE 
1 (PARAM  (290)  , POT) 

1 (PARAM  (293)  , RA2) 

EQUIVALENCE 

1 (PARAM  (296)  ,DELinT),  (PARAM(297)  ,DEL2DT)  , (PARAH  (298)  ,DEL3DT) 
1 (PARAM  (299)  ,DEL1)  , (PARAM  (300)  ,DEL2)  , (PARAM  (301)  ,BEL3)  , 

1 (PARAM  (30  2)  ,PHIRD)  , (PARAM  (303)  ,PHIH)  , (PARAH  (30  4)  ,DELFWl)  , 

1 (PARAH  (305)  ,DELFW2)  , (PARAM  (306)  ,U1P)  , (PARAH  (307)  ,U2P)  , 

1 (PARAH  (308)  ,U3P)  , (PARAH  (309)  ,U4P)  , (PARAM  (310)  ,S1P)  , 

1 (PARAM  (31 1)  ,S2P)  , (PARAH(312)  ,S3P)  , (PARAM(313)  ,S4P)  , 

1 (PARAM  (314)  ,QUAN1)  , (PAR-AM  (315)  ,QUAN2)  , (PAR AH  (3  16)  , QUA N 3) 

1 (PARAH  (317)  ,QUAN4)  , (PARAH  (318)  , AHPS3)  , 

1 (PARAM  (320)  , RWZ1A)  , (PARAM  (321)  ,RWZ2A)  , 

1 (PARAM  (32  3)  ,RMZ4A)  , (PARAM  (324)  ,IOUT  (1)  ) 

EQUIVALENCE  (NAM E ( 172) , NAMEX ( 1 ) ) 

(PHIFD,DEL2DT)  , (PHIF,DEL2) 

(PHIRD,DEL4  DT)  , (PHIR,DEL4) 

2F',  * 

' IZ*,' 

*AKR4», * 


(PARAH  (319)  ,ARPS4) 
(PARAH(322)  ,RWZ3A) 


EQUIVALENCE 
EQUIVALENCE 
DATA  NAHE/' 
».  TR*  • 


ns*,* 


HUF* , * 


HUR* , * 


•STOP* , ’ AKFI * , * AKF2* , *AKB3* , 


•CR3P*, *CH4P», 


A2*  , ' 


A3 


*ZBAS* , • 

* A4*,»TIR 


KRS* 


RH* 


* , *TOB  * 


ZR*, 
IXZ*, 

I ^ 

»SCAL*, 
« KSC*, 


B< 


A*,* 

IE*,*  • 

RR* , ' CF1P* 


FOT ' , • 
NG*  ,* 


AO* 


TF*. 
BF* , 
CF2P* , 
A1*i 


200 


NITI  560 
NITI  570 
NITI  580 
NITI  590 
NITI  600 
NITI  610 
NITI  620 
NITI  630 
NITI  640 
NITI  650 
NITI  660 
NITI  670 
NITI  680 
NITI  690 
NITI  700 
NITI  710 
NITI  720 
NITI  730 
NITI  74C 
NITI  750 
NITI  760 
NITI  77C 
NITI  780 
NITI  790 
NITI  800 
NITI  81C 
NITI  820 
NITI  830 
NITI  840 
NITI  850 
NITI  860 
NITI  870 
NITI  880 
NITI  890 
NITI  900 
NITI  910 
NITI  920 
NITI  930 
NITI  940 
NITI  950 
NITI  960 
NITI  970 
NITI  980 
NITI  990 
NITI1C00 
NITI1010 
NITI1020 
NITI1030 
NITI1040 
NITI1050 


NITI1080 
NITI1090 
NITI1 100 
NITI1110  I 
NIT1 1120  ; 
NITI 1130  , 
HITI1140  I 
NIT1 1150 


non  non 


1 

• 1 

# 

1 1 

f 

• IFN', 

' IF  • 

9 

• ISF', 

• ISR*, 

• IDR', 

• ARE* , 

•TSF 

,NITI1160 

1 

»KFS 

1 pT  « , 

• ISA1»  , 

• YSA2' 

9 

•PHS1 

•PHS2*, 

•CTSH  *, 

• IDF', 

* ARF 

, NITI1 170 

1 

*P-IN' , 

•Q-IN', 

• R-IN' , 

•0-IN* 

9 

•V-IN', 

' W-IH«, 

• X-IN* , 

' Y-IN* , 

•Z-IN 

, NIT1 1180 

1 

•THIN' , 

' PHIN ' , 

• PSIN*  , 

• DT' 

9 

• TH', 

• KT1», 

• KT2*, 

• KT3', 

' KT4 

, NITI1190 

1 

•RPSI 

•RFS2», 

• PPS3'  , 

•RPS4* 

9 

* B1', 

• B2', 

• B3*, 

• B4», 

' D 1 DT 

, NITI1200 

1 

• D2DT‘ , 

• D3DT  • , 

' DELF' , 

•DELR* 

9 

•DEL3* , 

•PHDT' , 

•PHIR' , 

•DFH1 • , 

•DFW2 

, NITI1210 

1 

•UIPR' , 

• U2PH*  , 

• U3PR'  , 

•04PR’ 

9 

•SI  PR*, 

•S2PR', 

•S3PR' , 

' 34PE*  , 

•PPRT 

, HITI1220 

1 

•FREC' , 

• RHSF* , 

•TQHX' , 

• KTQ' 

9 

• VC*, 

• MTS8 ' , 

•DS8M • , 

• tst'. 

•DSLP 

, NIT1 1230 

1 

•CGAM' , 

• CS 

• TQH', 

' TQF' 

9 

• PPL', 

• T1', 

• DSH*, 

1 1 

f 

•ISMS 

, NITI1240 

1 

•SW15*, 

NITI1250 

1 

* PQSW* , 

• VTPS • , 

• VHTP' , 

• AMCH* 

9 

• ESP', 

'KSL1* , 

• KSL2' , 

' AA1 ' , 

’ AA2 

, NITI1260 

1 

' CCR*, 

•CFCR • , 

' AP'  , 

' EFI' 

9 

» EP2', 

•AERO*, 

•VYH  •, 

' OMXW  , 

•OMZH 

, NITI1270 

1 

•RHCA' , 

•CYP  •, 

• CYR  • , 

•CZAL‘ 

9 

•CZQ 

•CLP  ', 

•CLR  *, 

' CMAL' , 

•CMQ 

, NITI1280 

1 

•CNF  ’ , 

•CNR 

• 5F  • , 

•VLEN' 

> 

•REHV, 

* 9 

• 9 

t 

1 9 

/ 

,HITI129C 

1 

9 

1 • 

r 

t • 

t 

9 

t t 

t 

9 • 

9 

' SNT', 

•SNSO' , 

•SNSI 

/NITI13C0 

DATA  SAWEX 

NIT1 1310 

1 

/•SNSW*  ^ 

•DIST* , 

• PL  ', 

•TSCP* 

9 

1 • 

• 

I 9 

9 

9 1 

! 

9 9 

» 

•PASS 

, NITI1 320 

1 

f f 

i 

' SI1 • , 

• SI2', 

' SI3' 

9 

• SI4', 

% 1 

9 

1 t 

t 

« 1 

0 

NITI1330 

1 

% t 

9 

« 1 

f 

1 < 

t 

' MTQB* 

9 

•DCSW  , 

• LDF*, 

•LDRF* , 

• EK1  ' , 

' EK2 

, SITU  340 

1 

» BMPL* , 

•BMPS* , 

» BHPH’  , 

• XB’ 

9 

'APF1 ' , 

•APF2S 

' APR1 • , 

' APR2' , 

*MUSF 

, NITI1  350 

1 

• ECON  • , 

’ FCSH'  , 

9 

f t 

9 1 

9 

1 9 

t 

I t 

0 

, NITI1  360 

1 

• 1 

9 

! 

• • 

t 

•FEE1' 

9 

'PEE2' , 

•THEV  , 

• THE2* , 

9 9 

0 

, NITI1370 

1 

f f 

9 

1 I 

t 

1 1 

t 

9 

( < 

> 

t 1 

9 

' HI  • , 

' H2*  , 

•LAMD 

, NIT  11 380 

1 

1 t 

9 

1 s 

t 1 

» 

9 

' BR1', 

• RR2*, 

» BB3', 

' BR4», 

NITI1390 

1 

• KCF’^ 

• NCR  ' , 

• KS  R • , 

' RBI* 

9 

' RB2', 

• RB3S 

• RB4*, 

• AFK1  ' , 

•AFK2 

, NITI1400 

1 

• AFK3« , 

' ARK1  » , 

* ARK2*  , 

» ARK3» 

9 

'OFCO' , 

• OFC1 • , 

* OFC2 ' , 

•OFC3* , 

•ORCO 

,NITI1410 

1 

•OFC1 • , 

•ORC2 • , 

' CRCl' , 

1 CPOF* 

9 

•CP1F* , 

•CP2PS 

'CPOR', 

•CP1R'  , 

•CP2R 

, NlTri420 

1 

•CROP*  , 

•CRIF  • , 

•CR2F' , 

•CROP* 

9 

'CR1R', 

•CR2R\ 

1 1 

f 

1 1 

0 

•BMPN 

, NITI1430 

1 

•TQE0« , 

•TQE1 ' , 

1 1 

t 

9 

• 1 

r 

1 1 

9 

• HPC, 

• HRC, 

•DRSM 

,NITI1440 

1 

•AXLE* , 

• DUAL  • , 

•TIRE' , 

•ROT', 

1 

RAO  ',  'R 

AV^  *RA 

2*  , 'RA3 

' , • RA4  • 

/ 

NITI1450 

AXAVE) 


EQUIVALENCE  (C0MPVR{1) 

CIMENSION  C0«PVP(17) 

DATA  SAD/0.  1745329E-V 
DATA  MPHIPS/17.6/ 

PEAI*4  MPHIPS 

REAL*4  IOOT(48)  ,IN,  SC AIAC  (28 ) , SCA LDC  (48) 

INTEGEP*2  BTS«  ,PESW  ,LETSH  ,OPEN  ,OPDN 
960  FORHAT('1  PARAMETER  VALUES  - BODEI  C - *,20A4,/ 

1 (•  ',5(I4,3X, A4,'  = *,G12. 5,' , ’)  ) ) 

VHTP  COMPARISON  VARIABLE  INITIALIZATION 
DO  21  1=1,19. 

COMPVR  (I)  = 0. 

21  CONTINUE 

TSTEP  = DTIN 
NUMBR  = 0 
DO  20  1=1 ,4 
DELX(I)  = 0. 

20  CONTINUE 

IVHTP  = PARAM(129)  ♦ .5 
lAERO  = PARAM  (14  1)  +0.5 

IDRSH  = PARAM(286)  + 0.5 
IAX=P  AR  AM  (287)  *0,5 
DUAL  TIRES  ON  SOLID  REAR  AXLE 

IDDLTR  = 0,  NO  DUALS 
= 1,  DUALS 
PARAM  (288)  + 0.5 
4,  SINGLE  REAR  TIRES 
6,  DUAL  BEAR  TIRES 
10,  DOUBLE  DUAL  REAR  TIRES 
PARAH(289)  ♦ 0.5 

201 


IDOLTR 

NWHBEL 


NWHEEL  = 


NITI1460 

NITI 1470 

NIT1 1480 

NITI149C 

NITI1500 

NITII‘^10 

NITI1520 

NITI1530 

SITI  1540 

NITI1550 

NITI1560 

NITI1570 

NITI1580 

NITI1590 

SITI16C0 

NITI 1610 

NITI162C 

NITI1630 

NITI1640 

NIT1 1650 

NITI1660 

NITI1670 

NITI1680 

NITI1690 

NITI1700 

NITI1710 

NITI1720 

NITI1730 

NITI1740 , 

NIT1  17  50/ 

/ 


TQfMAX=-1. E20 
TQRMRX=- 1 . E20 
AP1  = PAPAM  (055) 

AP2  = PABAN  (21  3) 

AP3=PARAn (214) 

AP4=PARAH  (215) 

AP5=PABAf1  (216) 

BTC1=PARAH  (217) 

ETVMAX=-1 . E20 
ETC2  = PARA(1  (2  18) 

EPSK1  = PARAM  (196) ♦RAD 
EPSK2=PARAH  (197) ♦RAD 
FEE1=PAPAM(219) ♦RAD 
FEE2=PARAM  (220)  ♦RAC 
THE1  = PARAM (221)  *RAD 
THE2=PARAM (222)  ♦RAC 
PSIMAX=-1 .E20 
PSIM=PSIIN^RAD 
XEND=TEND 

EXIT2  = PARAM  (18) ♦HPHIPS 

TIME25=0.0 

TinE10=0.0 

Ol=-6.0E-6 

,C2=0.009 

03=0. 0C01 

E4  = -0.  16 

E5=-0. 46 

E6=10.4 

ANUMO=0.0 

ADENO=0.0 

RMAX=-  1.E20 

PSI5=0.0 

DSWf1AX  = -1  . B20 

FHIMAX=“1 . E20 

ETAMAX=-1 . E20 

ISH7=1 

THRD=1, 0/3.0 
TWN7=1 .0/27.0 
TOO=0.0 
G=386.4 

APLUSB  = A ♦ B 

H1=RW-{A«(JP*E^AHS/  (A+B)  ) ♦G/ (2  . ♦AKT 1 ) 
H2=RW-  (AHOF^B^AKS/  (A+B)  ) ♦G/(2.  ♦AKT 2) 
H3=RW-  (AMDR  + A^AHS/  (A  + B) ) ♦G/(2.^AKT3) 
H4=RW-  (AMUR*  A^AMS/  (A+B)  ) *G/  (2.  ♦AKT4) 

IF  (IDOLTR.NE.1)  GO  TO  25 

H3  = RW  - (AMDR  + A^AHS  / (A  + B) ) ♦G/ (4 .♦AKT3) 
H4  = H3 
25  CONTINUE 

RN21  A = RW  - HI 
RHZ2A  = RW  - H2 
RB23A  = RW  - H3 
RWZ4A  = RW  - H4 
TS02=TS/2. 0 
TSP02  = TSF/2. 

TFO2=TP^0. 5 
TIE02  = TIR/2. 

T0R02  = TOR/2. 

TBO2=TR*0.5 

IF(IDULTR.EQ.I)  TR02  * (T0R02+TIR02) ♦O . 5 


NITI1760 

NITI1770 

NITI1780 

NITI1790 

NITI1800 

NITI1810 

NITI1820 

NITI1830 

NITI1840 

NITI105O 

NITI1860 

NITI1870 

NITI1880 

NITI1890 

NITI1900 

NITI1910 

NITI1920 

NITI1930 

NITI1940 

NIT1 1960 
NITI1970 
NITI1980 
NITI1990 
NITI2000 
NITI2010 
NITI2020 
NITI2030 
NITI2040 
NITI2050 
NITI2060 
NITI207C 
NITI2080 
NITI2C90 
NITI2100 
N IT  1 2 1 1 0 
NITI2120 
NITI2130 
NITI2140 
NITI2150 
NITI2160 
NITI2170 
NITI2180 
NITI2190 
SITI2200 
NITI2210 
NITI2220 
NITI2230 
NITI2240 


NITI2250 

NITI2260 

NITI2270 

NITI2280 

NITI2290 

HITI2300-' 

NITI2310 


/ 

{ 


I 
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TIBTOR=  0.  25*(tIH-TCB) 

NITI2320 

SPSR3=  (TAN {2.0*HFC/TF) ) *2.0/AHDP 

HITI2330 

SPSR4= (TAN (2  .0*HRC/TR) ) *2.0/AHDR 

NITI2340 

SH=AKS*AMUF+AnOR 

NITI2350 

OIN=UIZ*HPHIPS 

NITI2360 

VC=VCI N^MPHIPS 

NITI2370 

ZIN=(B*(H1+ZF) ♦A*(H3tZR) )/(A+B) ♦ PAHAH(29) 
THEIN= (H1-H3+ZF-ZR)/  (A+B)/RAD 

NITI2390 

APPS3  = UIN/H3 

NITI2400 

ABPSiJ  = DIN/H4 

NITI241C 

AIXP=  AMllF-0ZF*ZF+ ABOB*ZR*ZB 

NITI2420 

AIYP=AIXP 

NITI2430 

GO  TO  (31 , 32) ,IAX 

NITI2440 

30 

AIZP  = AMOF*A*A  ♦ AHUB*B*B  + AIF  ♦ AIR 

KITI2450 

GO  TO  3 3 

NITI246C 

31 

AIZP  = AMyF#(A*A  + TF02**2)  ♦ AMUE*B*B  + AIR 

NITI2470 

GO  TO  33 

NITI2480 

32 

AIZP  = AM(JF*(A*A  + TF02^*2)  + AMUB*(B*B  ♦ TR02**2) 

NITI2490 

33 

CONTINUE 

NITI2500 

AIXZP=AHUF*A*ZF-AMDR*B*ZR 

NITI2510 

GA«1=  AHUF*A- ABU  E*B 

NITI2520 

GAH2  = AMUF*ZF  + A[tUR*ZR 

NITI253G 

GAH3=GAW2 

NITI2540 

. AIXBB= AIX+AIXF 

NITI2550 

AiyBR=ATY+ATYP 

NITI2560 

AIZBP=AIZP  ♦AIZ 

NITI257C 

AIXZBR=AIXZP+AIXZ 

NITI25B0 

E1=AIXBR*AIZBR- AIXZBB+*2 

NITI2590 

E2=GAM 1*AIXZBR-GAM3*AIZBR 

NITI2600 

E3=GAM3*AIXZER-GAM  1+AlXBR 

NITI2610 

GV1  = GA«2*AIZBR-G  Atn^AIXZBR 

NITI2620 

GV2=GAn2*ATXZBR-GAMl*AIXBP 

NITI2630 

GP1=SH*AIZBR-GAM1**2 

NITI2640 

GP2=Sf1*AIXZBR-G  AM1*GAM3 

NITI2650 

GR1=GP2 

NITI2f60 

GR2=SM*AIXBR-GAM2*GA«3 

NITI267C 

CIP=B*AHS*G/  (AM  UF*  (A  + B)  ) +G 

NITI2680 

CIVP=  A*AMS*G/ (AMUR*  (A  + B) ) +G 

NITI2690 

TQMAXR=TQMAX*ARBR*0. 5 

NITI2700 

TQMAXP=TQMAX*ARFBR*0.5 

NITI2710 

AKTQR= AKTQ*ABBR*0. 5 

HITI2720 

AKTQF=AKTQ*ABFBR*0 . 5 

NTTI2730 

RZF=RS+ZF 

NITI274C 

RZR=RH+ZH 

NITI2750 

CA23=CA2*CA3 

NITI276C 

A2T=  OT*CA2 

NITI2770 

CA20=CA0*CA2 

NITI278C 

BA23=RA2*RA3 

NITI2790 

R2T=ROT*RA2 

NITI2800 

BA20=HA0*RA2 

NITI2810 

A1=GAM2/SH 

NITI2820 

A2=AIYBR/GAH2 

NITI2830 

A12=A1-A2 

NITI2840 

ONEOA=1.0/A12 

NITI2850 

DELTA=E1*SM+GAM2*E2+GAH1*E3 

NITI2860 

ONEOD=1.0/DELTA 

NITI2870 

DEL1DT=DEL1 DN 

NITI2880 

DEL2DT=DEL2DN 

NITI2890 

DEL3DT=DEL3DN 

NITI2900 

DEL1=0.0 

NITI2910 
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5432 

4321 
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DEL2=0 .0 

NITI2920 

DEL3=DEL3IN 

NITI2930 

PHIRD=PHIDM*RAD 

NITI2940 

PHIR=PHIRN*RAD 

NITI2950 

DELPW1=DF«1IN*BAD 

NITI2960 

DELFW2=DFB2IN*BAD 

NITI2970 

U1 P=U1 PIN 

NITI2980 

02P=U2PIN 

NITI2990 

U3P=U3PIN 

NITI3000 

D4P=U4PIN 

NITI3010 

S1P=S1PIN 

NITI3020 

S2P=S2PIN 

NITI3C30 

S3P=S3PIN 

NITI3040 

S4P=S4PIN 

NITI3050 

CUAN1=0.0 

NITI306C 

QUAN2=0.0  . 

NITI3070 

QUAN3=0.0 

NITI30R0 

CUAN4=0.0 

NITI3090 

P=PIN*RAD 

NITI31C0 

EO=P 

NITI31 10 

Q=JQIN*RAD 

NITI3120 

CC=Q 

NITI3130 

B=RIN*RAD 

NITI3140 

RO=R 

NITI3150 

d=din' 

NITI3160 

UO  = U 

NITI317C 

V=VIN 

NITI3180 

VO=VIN 

NITI3 190 

H=WIN 

NITI3200 

ao=wiN 

NITI3210 

X=XIN 

NITI3220 

XO=XIN 

NITI3230 

Y=YIN 

NITI3240 

YO=YIN 

NITI3250 

Z=ZIN 

NITI3260 

ZO=ZTN 

NITI3270 

THE=THEIN*RAD 

NITI3280 

THEO=THE 

NITI3290 

PHI=PHTIN*RAD 

NITI3300 

PHIO=PHI 

NITI3310 

PSI=PSIIN*RAD 

NITI3320 

PSIO=PSI 

NITI3330 

TIBE=0.0 

NITI3340 

JJTIME=0 

NITI3350 

DT=0.0 

NITI3360 

FOBRAT  ('O' ,8E15.6) 

NITI3370 

IHSW=0 

NITI330O 

XB  (1)  = PARAH  (201) 

NITI3390 

NBRP  = PARAH  (277)  +0. 5 

NITI3400 

IF  (NBHP.LT.2) GO  TO  4321 

HITI3410 

DO  5432  I=2,NBRP 

NITI3420 

XB(I) =XB(I-1) +PARAH(199) 

HITI3430 

CONTINUE 

NITI3440 

CONTINUE 

NITI3450 

CALL  SSBM  (1  1,  IRLEBB) 

NITI3460 

RETOBN 

HITI3470 

ENTRY  NTIAL1 

NITI3480 

CALL  LBDAFP(00,47,DACO,ILBERR) 

HITI3490 

CALL  TLDA 

NITI3500 

CALL  STCO  (1,ISTCOE) 

NITI3510 

I 
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DT=DTIN  NITI3520 

IS«1=0  SITI3530 

ISW7=0  NITI3540 

IF  (PPRT.NE.O .0) «RITE(LPTB,960)  (ALPH{I)  ,1  = 1,20)  , ((K,NAME(K)  , NITI3550 

1 PARAM  (K) ) ,K=1 ,N1)  NITI3560 

940  FORMAT  ( 10G12. 5)  NITI357C 

RETURN  NITI3580 

END  NIT1359C 
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THE  JOHNS  HOPKINS  UNIVERSITY 
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2.1.6  POTSET 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
POTENTIOMETER  SETTING  CALCULATION  SUBPROGRAM. 
THE  FOLLOWING  IS  PERFORMED  IN  POTSET: 

1 ) Calculation  of  parameters  used  in  the 
potentiometer  equations . 

2)  Calculation  of  potentiometer  settings. 
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SUBROUTINE 

SUBROUTINE 


POTS  ET 
POTSET 


POTS 

POTS 


******  *************  ************************************************ 

THIS  SUBPROGRAH  CALCULATES  PARAMETERS  USED  IN  THE  POTENTIOMETER 
EQUATIONS  AND  POTENTIOMETER  SETTINGS 

Q*** ************************************************************* ******* 

C0MM0N/DUALS/IDULTR,NHHEEL,TIR02,T0R02,TIRT0R,VBR2RP,  POTS 

1 FXU5,  FXU6,FYU5,  pyue,  ALTQ5,  ALTQ6,FSI3,F'SI4  ,FSI5,FSI6,  PPHIR  POTS 

COMMON/ZIlCH/TQMAXF,TQHAXR, AKTQF, AKTQR,TQDRF, TQDHR,IDRSH  POTS 

COMMON/DEVICE/KEYBD,ITTY,ICDRD ,1PTB,LPNT  POTS 

COHHON/HHHH/H1, H2, H3, H4  POTS 

COMMON/SPLTAX/  SPSR3,SPSB4 ,IAX  POTS 

COMMON/V ARS/P,Q, R , U , V , W , X , Y , Z , T HE, PHI , PS I , PO , Q 0, R 0 , UO , V 0, W 0, X 0,  POTS 

1 Y0,Z0,THE0, PHIO, PSIO  POTS 

COMMON/EFFS/ANUM, ADEN,ANUMDT,ADENDT,ANUMO, ADENO, ANUMDO, ADENDO,  POTS 

1 ANOUT,ACOUT  POTS 

C0HH0N/C0M3LK/AIXP,SM,AIYP,AIXZP,GAM1 ,GAM2,GAM3, AIXBR, AIYBR,  POTS 

1 AIZBR, A1 , A2, AIXZBR, A12, El, E2, E 3, DELTA , G Vi , GV2 , GP 1 ,G P2,G 8 1 , POTS 

1 GR2,CIP,CIVP,RZF,8ZR,A2T,CA20,CA23,  ANGNL,ANGNLO  POTS 

1 ,T8O2,TFO2,TSO2,G,THPD,THN7,B2T,RA20,RA23,ONEOA,ONEOD  POTS 

1,TSF02  • POTS 

COMMON /TIMBIK/JJTIME,TI ME, DT  POTS 


10 

20 


40 

50 

60 

70 

80 

90 

ICO 

110 

120 

130 

140 

150 

160 

170 

180 

190 


, COMMQN/UVW/VC,UIN 

POTS 

200 

C0MM0N/SP7BIK/N1,N2, 

IPOT 

(120)  , 

IPOT 

AD(120) 

, PARAM  (400) 

POTS 

210 

PEAL*4  IOUT(48) 

POTS 

220 

BEAL*4  IPOT,IPOTAD 

POTS 

230 

EQUIVALENCE 

POTS 

240 

1 (PABAM{  1),AMS) 

# 

(PARAM 

( 2) 

, AMUF) 

9 

(PARAM 

( 3) 

, AMUR) 

9 

POTS 

250 

1 (PARAM  ( 4)  ,ZF) 

r 

(PARAM 

{ 5) 

,ZR) 

9 

(PARAM 

( 6) 

, A) 

9 

POTS 

260 

1 (PARAM  ( 7)  ,B) 

r 

(PARAM 

( 8) 

,TF) 

9 

(PARAM 

( 9) 

,TR) 

9 

POTS 

270 

1 (PARAM  (10)  ,TS) 

# 

(PARAM 

(11) 

,AIX) 

9 

(PARAM 

(12) 

,AIY) 

9 

POTS 

280 

1 (PARAM  (1  3)  ,AIZ) 

9 

(PARAM 

(14) 

,AIXZ) 

9 

(PARAM 

(15) 

, AIR) 

9 

POTS 

290 

1 (P  ARAM  ( 16)  ,CF) 

9 

(PARAM 

(17) 

»«F)  ' 

9 

POTS 

30C 

1 (PARAM  (19) ,AKF1) 

9 

(PARAM 

(20) 

, AKF2) 

9 

(PARAM 

(21) 

, AKR3) 

9 

MODE 

890 

1 (PARAM  (22)  ,AKR4) 

9 

(PARAM 

(23) 

,CR) 

9 

(PARAM 

(24) 

,HR) 

9 

MODE 

910 

1 (PARAM  (25)  ,CF1  P) 

9 

(PARAM 

(26) 

,CF2P) 

9 

(PARAM 

(27) 

,CR3P) 

9 

MODE 

900 

1 (PARAM (28) ,CF4P) 

9 

(PARAM 

(30) 

, AKES) 

0 

MODE 

920 

1 (PARAM (31) ,RH) 

9 

(PARAM 

(33) 

,OT) 

9 

POTS 

350 

1 (PARAM  (34)  ,CA0) 

9 

(PARAM 

(35) 

,CA1) 

9 

(PARAM 

(36) 

,CA2) 

9 

POTS 

360 

1 (PARAM  ( 371  ,CA3) 

9 

(PARAM 

(38) 

,CA4) 

9 

(PARAM 

(39) 

,TIR  ) 

9 

POTS 

370 

1 (PARAM (44) ,AKDL) 

9 

(PARAM 

(41) 

, AKSC) 

9 

(PARAM 

(42) 

, ANG) 

9 

POTS 

380 

1 (PARAM  (43)  ,WG) 

9 

(PARAM 

(40) 

,T08  ) 

9 

(PARAM 

(45) 

, AKSL) 

POTS 

390 

EQUIVALENCE 

POTS 

400 

1 (PARAM  (46) ,ANL1) 

9 

(PARAM 

(47) 

, AIFW) 

9 

(PARAM 

(48) 

,AIF) 

9 

POTS 

410 

1 (PARAM  (49)  ,AI«F) 

9 

(PARAM 

(50) 

,AIHR) 

9 

(PARAM 

(51) 

, AID) 

9 

POTS 

420 

1 (PARAM (52) ,ARBR) 

9 

(PARAM 

(53) 

,TSF  ) 

9 

(PARAM 

(54) 

, AKFS) 

9 

POTS 

4 30 

1 (PARAM  (55) ,PTBR) 

9 

(PARAM 

(56) 

,YSA  1) 

9 

(PARAM 

(57) 

, YSA2) 

9 

POTS 

440 

1 (PARAM (58) ,YHS1) 

9 

(PARAM 

(59) 

,YHS2) 

9 

(PARAM 

(60) 

, AKD) 

9 

POTS 

450 

1 (PARAH(61),  AIDF) 

9 

(PARAM 

(62) 

,AEFBR) 

9 

(PARAM 

(63) 

,PIN) 

9 

POTS 

460 

1 (PARAM  (64)  ,QIN) 

9 

(PARAM 

(65) 

,8IN) 

9 

(PARAM 

(66) 

/OIZ) 

9 

POTS 

470 

1 (PARAM  (67)  ,VIN) 

9 

(PARAM 

(68) 

,HIN) 

9 

(PARAM 

(69) 

,XIN) 

9 

POTS 

480 

1 (PARAM  (70)  , YIN) 

9 

(PARAM 

(71) 

,ZIN) 

9 

(PARAM 

(72) 

,THEIH) 

9 

POTS 

490 

1 (PARAM  (73)  ,PHIIN) 

9 

(PARAM 

(74) 

,PSIIN) 

9 

(PARAM 

(75) 

, DTIN) 

9 

POTS 

500 

1 (PARAM (76) , TEND) 

9 

(PARAM 

(77) 

,AKT1) 

9 

(PARAM 

(78) 

,AKT2)  , 

POTS 

510 

1 (PARAM  (79) ,AKT3) 

9 

(PARAM 

(80) 

,AKT4) 

9 

(PARAM 

(81) 

/BPS1)  , 

POTS 

520 

1 (PARAM  (82)  ,EPS2) 

9 

(PARAM 

(83) 

,RPS3) 

9 

(PARAM 

(84) 

, RPS4) 

9 

POTS 

530 

1 (PARAM  (85)  ,B1) 

9 

(PARAM 

(86) 

,B2) 

9 

(PARAM 

(87) 

,B3) 

POTS 

540 

EQUIVALENCE 

POTS 

550 

1 (PARAH(88)  ,B4)  , 

(PARAM 

( 89) ,DEL1DN) , 

(PARAM 

( 90)  , DEL2DN) 

9 

POTS 

560 
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1 (PARAK(  91)  ,DEL3DN)  , (PAPAH  ( 92),DELPIN),  (PARAH(  93),DELRIN), 
1 {PARAH(  94),DEL3IN),  (PARAH  ( 95),PHIDN),  { P ARAM  ( 96)  , PHI  R N)  , 

1 (PARAM(  97),DFH1IN),  (PARAM(  9 8 ) ^ DF H2 IN)  , ( P AR AH  ( 99),U1PIN), 

1 (PARAH  (100)  , U2PIN)  , (PARAM  (101)  ,03PIN)  , (P  A R AH  { 10  2)  , U4  PI  N)  , 

1 (PARAH  (103)  , SIPIN)  , ( P A RAH  ( 10  4 ) , S 2PI N)  , (PARAH  (105)  , S3PIN)  , 

1 (PARAH  ( 106)  , S4PIN)  , ( PAR  AH  ( 1 07  ) , PPRT)  , ( P AR  A H (1 0 9)  , RWS  F) 

1 , (PARAH  (1  10)  ,TQH  AX)  , (PARAH  ( 1 11)  , AKTQ)  , (PARAH  (1  12)  , VCIM) 

1,  (PARAH  (113)  ,SWHT)  , (PAR  AH  (1  14)  ,DSHCH)  , (PARAH  (115)  ,TST)  , 

1 (PARAH(116),DSLP),  (PARAH(117),  CGAH)  , (P  AR  A H ( 1 1 8)  , C S) 

1 ,(PAPAH(119)  ,TQRBR)  , (PARAH  (12  0)  ,TQFBR) 

1 , (PARAH(121)  ,PFL)  , (PARAH(122)  ,TTD)  , (PARAH  (123)  ,DSW) 

1 , (PARAH  (124)  ,TSK) 

FQUIV  ALFNCE 

1 (PAR  AH  (130)  ,A  NCR)  , (PARAH  ( 131)  ,ES  P)  ,(  PARAH  (1  32)  , AKSL  1)  , 

1 (PARAH(133),AKSL2),(PARAH(134),AA1),  (PARAH(135),AA2), 

1 (PARAH  (1  36)  ,CCR)  , (PAR  AH  ( 1 37)  ,CFCR)  , (PARAH  (138)  ,AP)  , 

1 (PARAH(139)  ,EP1)  , (PARAH  (14  0)  ,EP2)  , (PARAH  (141), ERRI), 

1 (PARAH  (142)  , EPR2) , 

1 (PARAH  ( 143)  ,ARL1  ),  (PARAH  (144  ) ,AHL2)  , (PARAH  (145)  , RRIH)  , 

1 (PARAH  (146)  , RWR) 

FQUIVALENCE 

1 (P  APAH  (22  3)  ,CR1  C)  , (P  A R AH  (22  4)  , CR  IT)  , (PARAH  (225)  ,CR2C)  , 

1 (PARAH  (22  6)  ,CR2T)  , (PARAH  (227)  , CR3C)  , (P  AR  AH  ( 22  8)  ,CR  3T)  , 

1 (PARAH(229),CR4C),(PARAH(230)  ,CH4T)  , ( PA  R AH  (2  3 1 ) , AH  1 ) , 

1 (PARAH  (2  3 2)  , AH2)  , (PARAH  (233)  , ALAHBD) 

EQUIVALENCE 

1 (PARAH  (284)  , HFC)  , ( P A R AH  (285  ) , H RC) 

FQiriV  ALENCE 

1 (PARAH  (290)  , ROT)  , (PARAH  (291  ) ,R AO)  , (PARAH  (292)  , RAI)  , 

1 (PARAH  (29  3)  , R A2)  , (PAR  AH  (294)  ,R  A3)  , (PARAH  (29  5)  , RA4) 

EQUIVALENCE 

1 (PARAH  (296)  , DEL  IDT)  , (PARAH  (2  97)  ,DEL2DT)  , (PARAH  (298)  ,DEL3DT)  , 

1 (PARAH  (299)  ,DEL1)  , (PARAH(300)  , DEL2)  , (PARAH  (301)  ,DEL3)  , 

1 (PARAH  (302)  ,PHIRD)  , (PARAH  (3  03)  , PHI  B)  ,(  PARAH  (304)  , DELPW1)  , 

1 (PARAH  (305)  , CEL  FW2)  , (PARAH  (306  ) ,U1  P)  , ( PA  RAM  (30  7)  ,U2P)  , 

1 (PARAH  (30  8)  ,U 3 P)  , (PARAH  (309)  ,U4P)  , (PARAH  (310)  , SIP)  , 

1 (PARAH  (311)  ,S2P)  , (PARAH  (312)  ,S3P)  , (PARAH  (313)  ,S4P)  , 

1 (PARAH  (314)  ,QUAN1)  , (PARAH  (3  15)  ,QUAN2)  , (PAR  AM  (316)  ,QUAN3)  , 

1 (PARAH  (317)  ,QOAN4)  , (PARAH  (318)  ,ARPS1)  , (PARAH  (3  19)  , ARPS2)  , 

1 (PARAH  (320)  ,WSTH1)  , (PAR  AM  (3  21)  , RCTHi ) , (PARAH  (3  22)  ,MSTH2)  , 

1 (PARAH  (323)  ,WCTH2)  , (P  AB  AM  ( 3 24)  , 10  UT  ( 1)  ) 

DATA  T/1./ 

C N1  , N2  EQUATED  TO  THEIR  VALUES  IN  MAIN 

H0N=C .01 
TOU=C . 00 1 

AIBR=AIBR+AID*ARBR^*2*0 . 25 
AIBRP=AIBR-AI»R 

AIFBR  = AIWF  ♦ AIDF*ARFBP*2  * 0.25 

AIFBRP  = AIFBR  - AIWF 

FPS1=UIN/H1 

RPS2=UIN/H2 

BPS3=UIN/H3 

RPS4=UIN/H4 

CALL  SSRM (01 ,IRLEPH) 

IP(RF.GE.O)  CALL  SSRP (01 ,IRLERR) 

CALL  SSRB  (08 ,IELERB) 

IF(RR.GE.O)  CALL  S SRP  (0  8 ,1  HIER  R) 

SFSF=PARAH (32)/10000. 

IP0T(16  ) = T0U*CP1P*T 
IP0T(19  )=  . 2*T0U^CF1P*T 
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POTS  570 
POTS  580 
POTS  590 
POTS  600 
POTS  610 
POTS  620 
POTS  630 
POTS  640 
POTS  650 
POTS  660 
POTS  670 
POTS  68C 
POTS  690 
POTS  700 
POTS  710 
POTS  720 
POTS  73C 
POTS  740 
POTS  750 
POTS  760 
POTS  77C 
POTS  780 
POTS  790 
POTS  00 C 

POTS  830 
POTS  840 
POTS  850 
POTS  860 
POTS  870 
POTS  880 
POTS  890 
POTS  900 
POTS  910 
POTS  920 
POTS  930 
POTS  940 
POTS  950 
POTS  960 
POTS  97C 
POTS  930 
POTS  990 
POTS1000 
POTS1010 
POTS1C20 
POTS1030 
POTS  1040 
POTS1050 
POTS1060 
POTS1C70 
POTS1080 
POTS1C90 
POTS1100 
POTS1880 
POTS1890 
POTS1920 


1 


IPOT(22  )=  T0D*CF2P+T 
IPOT(24  )=  . 2*TOa^CF2P*T 
IPOT(27  )=  TC0*CP3P*T 
IPOT(29  )=  . 2*TOU*CB3P*T 
IPOT(49  )=  T0U*CR4P*T 
IPOT (050)=AIBRP/AIEB*T 

IPOT(51)  = ((RWSF*4.*AKT1)/(10000.*AIWF)  ) ♦T^O.1 
IPOT  (52  ) =(4  ,0/AlHB)  ♦T*PAPAM  (238) 

IPOT  (54  )=  . 2*TCrj*CF4P*T. 

IPOT(55)  = (100.*RHS,F/3000.)  *I 
IPOT  (56)  =IPOT  (55) 

IPOT  (58)  =IPOT  (55) 

IPOT(60)  =100.*T/AKF1 
IPOT(61)  =100.*T/AKE2 
IPOT(62)  =100.*T/AKR3 
IPOT(63)  =100.*T/AKR4 
IPOT (64) =SPSF 
IPOT (65) =SFSF 
IPOT (68) =SFSF 
IPOT(69) =SFSF 


IPOT  (1  1 1)  = (4.0/AIBR)  ♦T*PARAB(24  1) 

IPOT (11 2) = (4.0/AIBR) ♦T*PARAM (240) 

IPOT  (113)=  ( (RWSF*4,*AKT3) /( 100  00.  + AIBR)  ) *T*0.1 
IPOT  (1  14) =HUN*RPS4PT 
IPOT(116)  =IPOT(86) 

IPOT  (1  17)  =IPGT  (87  ) 

IPOT(1 18) =IPOT(88  ) 

IPOT(1 19) =IPOT(50) 

C#« »«##*#«* **«#»«««## *«#«»*«»««###«#«*» *««*«« 

C###  SPLIT  FRONT  AXLE  LOGIC  FOR  680  ####* 

C»t» »««**#»««««««««##««»««#»**###*«#«#» »«#*«« 

CALL  SSRM (00,IRLERR) 

IPOT(01  )=T*PARAM  (175)/AHS  ♦ SFSF  ♦ 10. 

IPOT(02  ) = (2.0/  (AflOF)  ) *T*PARAH  (175)  ♦ SFSF 

IPOT  (04  ) = (HON*RF/  (TF*TF)  ) *T*0 . 1 

IPOT  (05)=  (2.0*AKT2/(5000.0*AMUF))  *T/1 . 0+PARAH ( 1 75) 
IPOT(06  ) =T*PABAM (175) /AMS  ♦ SFSF  ♦ 10. 

IPOT  (07  )=IPOT(02  ) 
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POTS  1370 
POTS1380 
POTS1390 


IPOT  (72)=IPOT  (55) 

IPOT  (073)  =T*PARAH  (175) 

IPOT (83)  = ( (RWSF*4.*AKT4)/(10000.*AIBR)  )*T*0.1 
IPOT  (085)  =T*PAR  AM  (175) 

POTS1440 

IPOT (086) =0.2000*1 

POTS1460 

IPOT(87)=  (2./RWSF)  *T 

POTS1470 

IPOT  (88)  = (RW/RWSF)  *T 

POTS1480 

IPOT(90)  = 0.0 

POTS1820 

IPOT(91)  = 0.0 
IPOT  (096) =IPOT (86) 

POTS  1830 

IPOT (98  ) =IPOT(88  ) 
IPOT  (100)  =T*  PAR  AM  (175) 

POT  SI  500 

IPOT  (99  ) =IPOT (87  ) 

POTS1510 

IPOT(ICI)  =HUN*RPS1*T 

IPOT (102)=  ( (RWSF*4.*AKT2) /( 10000.  *AIWF)  ) *T*0.  1 
IPOT (103) =(4.0/AI«F) *T*PARAM (239) 

POTS1520 

IPOT (104) =HnN*RPS2*T 
IPOT  (105)  =T*PARAH  (175) 
IPOT  (106)  =IPOT  (86) 

POTS1550 

IPOT  (107)  =IPOT  (87  ) 

POTS1570 

IPOT(1C8) =IPOT(88  ) 

POTS158C 

IPOT  (1  10)  =HUN*RPS3  *T 

POTS1590 

POTS1630 

POTS1650 

POTS1660 


POTS1860 


POTS1140 

POTS1150 

POTS1170 


TPOT  (21)=PARA!1  (17S)  *T 

POTS1250 

IPOT(25) =PARAH(175) *T 

POTS1280 

I POT  (32)=  (2.0*AKTV(5000.0*AMUF))  ♦T/1.0*PABAfl  (175) 

POTS  13  20 

IPOT(03)  = 0.0 

POTS1730 

IPOf(08)  = 0.0 

POTS  1740 

IPOT(34)  = 0.0 

POTS1750 

IPOT(39)  = 0.0 

POTS176C 

IPOT(44)  = 0.0 

POTS1770 

IPOT(47)  = 0.0 

POTS1780 

IPOT(59)  =0.0 

POTS  179  0 

IPOT  (66)  = 0.0 

POTS1800 

IPOT(67)  = 0.0 

POTS1810 

IPOT{95)  = 0.0 

POTS  1840 

IPOT  (97)  =0.0 

POTS  1850 

IF(IAX.NE.O)  GO  TO  1024 

POTS1940 

Ci### 

««»««##«#«.«»««*»«#««#  #««»i«i««*«  #*«««*#« 

POTS  195  0 

c### 

SOLID  FRONT  AXLE  LOGIC  FOB  680  ♦!### 

POTS1960 

c#### 

«*««#«#««##«*«#««#««#«#*#«»#« »«««#««««»# 

POTS  1970 

CALL  SSRP  (00,  IRLERR) 

IPOT(02  )=(1.0/(  AHUF) ) ♦T*PARAK  (175)  ♦ SFSF 

POTS1 980 

IPOT  (0.3)  = TF/80.  ♦ T 

IPOT(08)  = ,20.*TSF/ (2. ♦AIF)  ♦T*PARAB (175)  * SFSPf  10. 

POTS2C50 

IPOT(25)  = (1./2.5) ♦T*PABAM  (175) 

POTS 2 070 

, IPOT.(3  2)=  (2.  O^AKTI/ (10000.  + AMUF)  ) *T/1.0*PARAH  (175) 

POTS2080 

IPOT  (34)  = IPOT  (02) 

POTS2090 

I POT  ( 3 9)  =0.25*(  ABS  (RF)  ) / (1  0000  . *TS  F)  ♦T 

POTS2 100 

IPOT  (4  4)  = IPOT  (19) 

POTS21 10 

IPOT(47)  = TSF/200.*T 

POTS2  120 

IPOT(59)  = IPOT  (47) 

POTS2130 

IPOT(66)  = 0.25*TSF/20. *T 

POTS2140 

IPOT(67)  = IPCT(66) 

POTS  2 150 

IPOT(95)  = 2.*AKT2/(10000.*AHUF)  ♦T^PARAB  (175) 

POTS2 160 

IPOT  (97)  = IPOT  (03) 

POTS2 170 

IPOT(04)  = 0.0 

POTS2000 

IPOT(05)  = 0.0 

POTS2010 

IPOT(06)  = 0.0 

POTS202C 

IPOT(07)  = 0.0 

POTS2030 

1C24 

CONTINUE 

POTS2180 

IF(IAX.EQ.2) GO  TO  1021 

POTS  2 190 

C«»« #«#««###»«###*«««»•»«»»$»«««»*«* »«#*««*## 

POTS2200 

c#### 

SOLID  REAR  AXLE  LOGIC  FOR  680  «#### 

POTS2210 

«#«««#««##»##«««»*«##»#*#«#»#««*# #»»»»« 

POTS2220 

CALL  SSRP  (1 0,IRLERR) 

IPOT(09  ) = ( l./ANUB)  *T*PAR  AM  (175)  * SFSF 

POTS2250 

IPOT  (10  ) = (AKT3/  (5  000.0  ♦AMUR)  ) ♦T^PARAH  (175) 

POTS1 180 

IPOT (1  1 ) = (AKT4/  (5G00.0*AMUR) ) ♦T*PARAM  (175) 

IPOT  (12  ) =T*PARAH  ( 175) /AMS  ♦ SFSF  ♦ 10. 

IPOT  (13  ) =IPOT(09  ) 

IPOT(15  ) = (10.0*TS/AIR)  *T*PARAM  (175)  ♦ SFSF  ♦ 10. 

POTS1 190 

IPOT(17  ) =0.40*T*PABAM (175) 

POTS2280 

IPOT  (26)  = (ABS  (BR)  / (4000.*TS)  ) *T*0 . 1 

POTS2290 

IPOT (28) =PARAM (175) *T 
IPOT  (35  ) = (HUN*TS02*T) 

POTS1300 

IPOT(36  ) = (TS02/40 .0) *T 

POTS2310 

IPOT  (45  )=TPOT(36  ) 
IPOT (46  ) =IPOT(35) 

POTS2320j 

1 

IPOT  (53  )=IPOT (26  ) 

POTS2300, 

IPOT(109) =(TRO2/40.0) *T 

POTS2350, 

IPOT(115)=IPOT(109) 

POTS2360 

IPOT(71)  =0. 

i 
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i 

i 


f 


o n 


V 


IPOT(80  ) =0. 

IPOT(81  )=0. 

IPOT (82  ) =0. 

GO  TO  1022 
1021  CONTINDE 

#««*##«**«*»#««*»*#«*«*#«#*««#««** 

C####  SPLIT  REAS  AXLE  LOGIC  FOR  680  ♦###♦ 

C««#«  #«»««#*»«»###*«*#«*««#*>*##««««*««««««»» 

CALL  SSRK  (10,IRLEBR) 

IPOT (10) =AKT3  + 2.0/  (5000.0*AHUR) ♦T* PA BAM (175) 
IPOT(12  )=T*FABAM(175)/AHS  ♦ SPSF  ♦ 10. 

IPOT ( 17) =PARAM  (175) *T 
IPOT (28) =P ARAM (175) *T 

IPOT  (13)  = 2.0/ ( AMUR)*T*PARAM(175)  ♦ SFSF 

IPOT  (7  1)  = (RR/  (100.  *TR**2)  ) 

) =AKT4*2.0/  (5000.0*AMOB)*T*PARAH  (175) 
)=2.0/(  AMUR)  *T*PARAM  ( 175)  ♦ SFSF 

) =T*PARAM  ( 175) /AMS  * SFSF  ♦ 10. 

= 0.0 
= 0.0 
)=0. 


IPOT (80 
IPOT  (8  1 
IPOT (82 
IPOT  (09) 
IPOT  (11) 
IPOT (15 
IPOT  (26 
IPOT (35 
.IPOT  (3  6 
IPOT  (45 
IPOT (46 
IPOT  (53 


)=0, 
) =0. 
)=0. 
)=0. 
) =0. 
)-0. 


IPOT(109) =0. 

IPOT  (1  15)  =0. 

1022  CONTINDE 

DUAL  TIRES  ON  SOLID  REAR  AXLE 

IDULTR  = 0,  NO  DUALS 
= 1,  DUALS 

IF  (IDULTR  .NE  . 1)  GO  TO  1026 
IPOT(IC)  = 2.*IPOT(10) 

IPOT  (1  1)  = 2.*IPOT  (11) 

IPOT(83)  = 2. ♦IPOT  (83) 

IPOT(113)  = 2.*IPOT(113) 

CONTINUE 
IDBSH=0, 

= 1, 

IF(IDRSH.NE, 


1026 


REAR  WHEEL  DRIVE 
FOUR  WHEEL  DRIVE 
1)  GO  TO  1025 


IPOT (51) = { (RWSF*4. ♦AKT1)/ (10000. *AIFBR)  ) ♦T^O. 1 


1025 


IPOT (52) 
IPOT  (90) 
IPOT  (91) 
IPOT  (102) 
IPOT(103) 
CONTINUE 
RETURN 
END 


(4./AIFER) ♦T*PARAH(238) 

(AIFBRP/AIFBR) *T 
IPOT  (90  ) 

( (RWSF*4 .+AKT2) /(10000. ♦AIFBB) ) *T*0. 1 
(4./AIFER) *T*PARAM (239) 


POTS2460 

POTS2470 

POTS2480 

POTS2490 

POTS2500 

POTS2530 


POTS26 10 


POT S 2 64 C 
POTS2660 


/ 

POTS2800 
POTS2810 
POTS2820 
POTS2830 
POTS2840 
POTS2850 
POT S2 860 
POTS2870 
POTS2880 
POTS2890 
POTS 2900 
POTS2910 
POTS2920 


POTS2960 


POTS2990 

POTS3000 

POTS3010 
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THE  JOHNS  HOPKINS  UNIVERSITY 

APPLIED  PHYSICS  LABORATORY 

LAUREL,  Maryland 


2.1.7  MODEL 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 

MATHEMATICAL  MODEL  SUBPROGRAM.  THE  FOLLOWING 

IS  PERFORMED  IN  MODEL: 

1)  Reading  of  the  analog-to-digital  converter 
(ADC)  variables. 

2)  Computation  of  simulation  time. 

3)  Calculation  of  digital  model  equations. 

4)  Data  preparation  for  output  of  the  digital- 
to-analog  converter  (DAC)  variables. 

5)  Detection,  limiting,  and  flagging  of  ADC 
and  DAC  variable  overloads . 

6)  Collection  of  TRACK  data  for  output  at  the 
end  of  a run. 
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C SUBRODTINE  HODEL  HODE 

SOBROOTINE  MODEL  HODE 

QiH,  t ***********  ■¥***^*  *********  ************^******^***********41^********=^^ 

C THIS  SDBPROGRAM  PERFORMS  THE  FOLLOWING  : 

C 1)  READING  OF  THE  ANALOG-TO -DIGITAL < ADC)  CONVERTER  VARIABLES 

C 2)  CGMPOTION  OF  SIMULATION  TIME 

C 3)  CALCULATION  OP  DIGITAL  MODEL  EQUATIONS 

C 4)  DATA  PREPARATION  FOB  OUTPUT  ON  THE  DIGIT AL-TO-AN ALOG  (D/A) 

C CONVERTERS  , 

C 5)  DETECTION,  LIMITING,  AND  FLAGGING  OF  ADC  AND  D/A  VARIABLE 

C OVERLOADS 

C 6)  COLLECTION  OF  TRACK  DATA  FOR  OUTPUT  AT  THE  END  OF  RUN 

Q^^^7tC******Ttl$i*liC**^************^********i)C  *********  ***************=lf********^ 


COHMON/START/  ZDUMHY(4)  HODE 

COMMON/EMON/IERDAC (10) ,TEBDAC(10) , IDAC K, I ENDR (20)  MODE 

COHMON/ERMON2/  I ER A DC ( 1 0) , T ERADC ( 1 0) , I ADCK  MODE 

COMMON/DACADC/  N A M D AC , N A MA DC , I DAC , I ADC , A DCNUH , D ACNU M HODE 

COMMON/ AERO/S FXS ,S  FYS ,S FZS, SNT HES , SNPHIS, S NPS I S , A PLUS B , I AER 0 MODE 

COMMON/DULVAR/Z3ID,Z4ID,Z5CD,Z60D,  HODE 

1 F3RID, F4RID, F5ROD,F6ROD,  HODE 

1 U3ID,U4ID,U50D,U60D,  HODE 

1 V3ID,V4ID, V50D,V60D,  MODE 

,1  W3ID,W4ID,H50D,W6CD,  MODE 

1 UG3IE,UG4ID,UG50D,UG60D,  HODE 

1 VG3ID, VG4ID, VG50D,VG60D,  RODE 

1 UG3IDP,UG4IDP  ,UG50DP,UG6CDP,  MODE 

1 S3ID,S4ID,S50C,S60D,  HODE 

1 CF3ID,CF4IC, CF50D,CF60D,  MODE 

1 AMUI 3,AMUI4 ,AMUI5 ,AMUI6,  MODE 

1 ALTQ3F, ALTQ4P,  MODE 

1 OTM3P,OTM4P,OTM5 ,OTM6  HODE 

COMMON/DU ALS/IDULTB,NW HEEL, TIRO 2,  T0R02  , TIE  TOR , VBRZRP,  MODE 

1 FXU5,FXU6,FYD5,FYU6,ALTQ5,AITQ6,FSI3,FSI4,FSI5,FSI6, PPHIR  HODE 

COMMON/PAUL/  D 1 , D2 , D 3 , D4 , S F YU , TMP , SNPH lU , S NTH EU , S N PSIU , MODE 

1QDT,PDT,  RDT  ,UDT,VDT,WDT, PHIDT,THEDT, PSIDT,XDT,YDT,ZDT,  HODE 

1 AKK1,AKK2,  THS1,THS2,  HOPE 

1 AMT1 , AMT2,SN,SFXU, ETVDT, ETAX, ETAL,  HODE 

1 ZIP  (4)  ,PHII  (4)  , HODE 

1 U1I  (4)  ,BAMI  (4)  , MUP  (4)  ,S  AMI  ( 4)  , FI  (4)  , FXUI  (4)  ,PYUI  (4)  ,GI  (4)  , MODE 

1 ALFI  (.4)  , BET  IP  (4)  ,BETIBR  (4)  ,SLIPI  (4)  , AM  II  (4)  , AM  21  (4)  , UO I (4 ) ,MODE 

1 PCI  (4)  ,FCln  AX  (4)  ,FSI  (4)  , HODE 

1 ABI  (4)  ,BETAI  (4)  , AMUI  (4)  ,SNI  (4)  , RMI  (4)  ,GBI  (4)  ,FRIBR  (4)  , BODE 

1 RWZI  (4)  ,ZI  (4)  ,PRI(4)  , UI  (4)  ,VI(4)  ,HI(4)  ,UGI(4),  HODE 

1 VGI  (4)  ,S  INPSI  (4)  ,PSII  (4)  ,COSPSI  (4)  ,UGIP  (4)  , PHI  CGI  (4)  ,CVI  (4)  HODE 

1 ,ALTQ  (4)  ,OTM  (4)  , S A LTQ,  FOTM  , ROT  M MODE 

1,AP1, AP2, AP3,AP4,AR1 ,AR2,AR3,AR4, ANTI1 , ANTI2, ANTI3, ANTI4  MODE 

1,DLIS  (4)  ,ZIMX(4)  ,FES1,FES2,FBS3,FBS4  HODE 

1,PHIDMX  HODE 

COMMON/APL/  OPEN  , RTSW  ,LDT3H  ,RBSH  MODE 

COHMON/SPLTAX/  SPSR3,SPSR4 ,IAX  MODE 

COMMON/SOLDAX/  PHI FNT (0 7)  , THEFNT (0 7)  , MODE 

1 PSIFNT  (7)  ,PHIRR  (7)  ,THERB  (7)  ,PSIRR  (7)  MODE 

COMHON/OUTVAR/  FOUT,QOUT, ROOT, OOUT, VOOT, HOUT, XOOT , YOUT , ZOOT , MODE 

1PDTOUT,QDTOUT,RDTOUT,THEOOT,PHIOUT,PSICUT,UBTOOT,VDTOOT,WDTOUT  HODE 
COMMON/EXTRA/  PSI3 S, PSI4 S , BT V, AYSTI 

C0HM0N/THIMGS/THAX1,TMAX2,TMAX3,TQRMAX,TQFMAX,PSIHAX,0NER  HODE 

C0MM0N/CACAT0/EPSK1,EPSK2,FEE1 ,FEE2,THE1 ,THE2  MODE 

COHHON/DELS/DELSHC  HODE 

COMMON/XYZ/NDHBR  MOOE 


10 

20 


30 

40 

50 

60 

70 

80 

90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

26C 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

450 

460 

470 

480 


217 


COMMON/EFPS/ANOB,  ADEN,  ANOM  DT,  ADEN  DT,  ANoHO,  ADE  NO  , A NtJNDO  , ADE  N Do»  BODE  490 

1 ANOUT,ADOOT  BODE  500 

CXDBBON/XBS/XB  (30)  , NS  (4, 30)  ,DELX  (4)  ,11  (4)  ,NNN  BODE  51C 

COBMON/VARS/P,Q, R,D,V,«,X,X ,Z,THB,PHI, PS I , PO , QO , BO , DO , VO , WO , XO , BODE  520 

1 YO,ZO, THEO, PHIO,PSIO  BODE  530 

COBBON/UVW/VC,OIN  BODE  540 

COBBON/EES/01,02,03,E4,E5,E6  BODE  550 

COMBON/ZILCH/TQBAXF,TQB AXE, AKTQF, AKTQR , TQDBF, TQ DB R , ID 8 S W BODE  560 

COBMON/INOOT/  I N { 3 2)  , DACO ( 4 8)  , I SW 1 , IS W7, I PBT  BODE  570 

COBHON/COBBLK/AIXP»SB, AIYP, AIXZP, GABi , GAB2 ,GAB3 , AIXBR , AIYBR,  BODE  580 

1 AIZBR,A1,A2, AIXZBB,A12,E1, B2,E3, DELTA, GV1,GV2,GP1,GP2,GR1,  BODE  590 

1 GR2,CIP,CIVP,BZF,RZR,A2T,CA20 ,CA23,  ANGNL, ANGNLO  BODE  6C0 

1 ,TBO2,TFC2,TSO2,G,THRC,TWN7,R2T,BA20,RA23,ONEOA,ONEOD  BODE  610 

1,TSF02  . BODE  620 

COBMON/SWITCH/  ISH  BODE  630 

COMBON/OPSM/IHSW  BODE  640 

COBBON/SP7BLK/N1,N2,IPOT(120) ,IPOTAD(120) ,PARAB(400)  BODE  650 

COMBON/NEWER/TIBE25,TIBE10, PSI5,PHIMAX, DSWBAX  BODE  660 

COBBON/NONABE/XEND  ,0,EXIT2  BODE  670 

COBBON/COMVAB/  A X A V E , CU VR AT , EETDH X ,CUBTBP , TIMDEC, JU BP, OELST B, DEL,  BODE  68C 

1 AXI,CUBVAV, ABBTV,AYBAX,RBAX,DELBET,DELPSI,BETABX,  NODE  690 

1 •TINBMP,GETDI ,TIMIN5 , TSTEP  , IVHTP  MODE  700 

COMBON/TIBBLF/JJTIHE,TlME, DT  MODE  710 

, COMMON/DEVICE/KEYBD,ITTY,ICDRD ,LPTR,LPHT  BODE  720 

COMMON/TRACK/JIN, IKEFP, ATBACK,ISABP,ONTIB,OFFTIM,ITRA,  BODE  73C 

1 ITRAA,ITRNA,TTRIA  MODE  740 

COMMON/IO/DACPLA ,ADCPLA,SCALDC,SCA1AC  MODE  750 

COBNON/SPBING/  DLSDS1,  DLSfTS2,  BLSUS3,  DLSOS4  , DELSF1  (10)  ,DELSF2  (10)  , 


1DELSE3  (10)  ,DELSR4  ( 10) 

,FDLSF1 (10) ,FDISF2 (10) 

,FDLSR3  (10)  , FDLSR4  (10)  , 

1NDBLF 1,NDELF2,NDBLR3, 

NDELR4 

BEAL*4  ZDDMMY 

MODE 

780 

EQUIVALENCE  (BVALaE(l), 

ZDUMMY (1 ) ) 

MODE 

790 

EQUIVALENCE  (AFF(1), 

APF1)  , (APR  (1) 

,APR1)  , 

(BUS  (1) ,MUSF)  , 

MODE 

800 

1 (APF(2), 

APF2)  , (APR  (2) 

, APR2)  , 

(M 

US  (2)  ,MUSR) 

MODE 

810 

EQUIVALENCE 

MODE 

820 

1 (PABAB(  1),AMS) 

# 

(PABAM  ( 2) 

,AHUF) 

9 

(PARAM  ( 3)  , AMUR) 

, MODE 

830 

1 (PARAN  ( 4)  ,ZF) 

f 

{PAFAM(  5) 

,ZR) 

9 

(PARAM  ( 6)  , A) 

, MODE 

840 

1 (PAPAM  ( 7)  ,B) 

9 

(PARAN  ( 8 ) 

,TF) 

9 

(PARAM  ( 9)  ,TR) 

, MODE 

850 

1 (PARAM  (10)  ,TS) 

0 

(PARAM  (11) 

, AIX) 

9 

(PARAM  (12)  ,AIY) 

, MODE 

860 

1 (PARAM  (13)  ,AIZ) 

9 

(PABAB  (14) 

, AIXZ) 

9 

(PARAM  (15)  , AIR) 

, MODE 

870 

1 (PABAM  (16)  ,CE) 

9 

(PARAM  (17) 

,RF) 

9 

MODE 

880 

1 (PARAM  (19)  ,AKF1) 

9 

(PARAM (20) 

,AKF2) 

9 

(PARAM  (21)  , AKR3) 

, MODE 

890 

1 (PARAN  (22)  ,AKR4) 

9 

(PABAM  (23) 

,CR) 

9 

(PARAH  (24)  ,BR) 

, MODE 

910 

1 (PARAM (25) ,CF1P) 

9 

(PARAM  (26) 

,CF2P) 

9 

(PARAM  (27)  ,CR3P) 

, MODE 

900 

1 (PARAM (28) ,CB4P) 

9 

(PARAH  (30)  , AKRS) 

, MODE 

920 

1 (PARAM  (31)  , RW) 

9 

(PARAM  (33)  , OT) 

, MODE 

930 

1 (PARAM  (34)  ,CA0) 

9 

(PABAB  (35) 

,CA1) 

9 

(PARAH  (36)  ,CA2) 

, MODE 

940 

1 (PARAN  (37)  ,CA3) 

9 

(PARAN  (38) 

,CA4) 

9 

(PARAM  (39)  ,TIR  ) 

, MODE 

950 

1 (PARAM  (44)  ,LAFT) 

9 

(PABAB  (41) 

,AKSC) 

9 

(PARAH  (42)  , ANG) 

, MODE 

960 

1 (PARAN (43)  ,LAFC) 

9 

(PARAM  (40) 

,TOR  ) 

9 

(PARAB(45) ,LARC) 

MODE 

970 

EQUIVALENCE 

MODE 

980 

1 (PARAM  (46)  ,LART) 

9 

(PARAM  (47) 

,AIFH) 

9 

(PARAM  (48)  , AIF) 

, MODE 

990 

1 (PARAM  (49)  ,AIWF) 

9 

(PARAM  (50) 

,AIWR) 

9 

(PARAH  (51)  , AID) 

, MODE1 

000 

1 (PARAB(52) ,AEBB) 

9 

(PARAM  (53) 

,TSF  ) 

9 

(PARAH  (54) , AKFS) 

, MODE1010 

1 (PARAM (55) ,PTBR) 

9 

(PARAM  (56) 

,YSA  1) 

9 

(PARAM  (57)  ,YSA2) 

, HODE1020 

1 (PARAM  (58)  ,YHS1) 

9 

(PARAS  (59) 

,YHS2) 

9 

(PARAM  (60)  , AKD) 

, HODE1030 

1 (PARAM(61),  AIDE) 

9 

(PARAN  (62) 

,ARFBR) 

9 

(PARAM  (63)  ,PIN) 

, MODE1040 

1 (PARAB(64)  ,QIN) 

9 

(PABAB  (65) 

,RIN) 

9 

(PARAH  (66)  ,UIZ) 

, HODE1050 

1 (PARAM (67) ,VIN) 

9 

(PABAB  (68) 

,SIN) 

9 

(PARAH  (69)  ,XIN) 

, HODE1060 

1 (PARAM  (70)  , YIN) 

9 

(PABAB  (71) 

,ZIN) 

9 

(PARAM  (72)  ,THEIN) 

, MODE1070 
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(PAR&M  (73)  ,PHIIN) 
(PiBAH(76) ,TIND) 
{PARAH(79) ,AKT3) 
(PARAM (82) rBPS2) 
(PABAM  (85)  ,B1) 
FQOIVALENCE 


(PARAH  (74)  ,PSIIH) 
(PARAM  (77)  ,AKT1) 
(PARAM  (80)  , AKT4) 
(PARAM  (83)  ,RPS3) 
(PARAM  (86)  ^B2) 


(PARAH(75)  , CTIN) 
(PARAM  (78)  , AKT2) 
(PARAM  (81)  ,RPS1) 
(PARAH (84)  ,RPS4) 
(PARAH  (87)  , B3) 


(PARAM  (88)  ,B4)  , 

(PARAH  (91),  DEL3DN) 
(PARAH  ( 94)  ,DEL3IN) 
(PARAH  ( 97)  , DFW  1IN) 
(PABAM  (100)  ,02PIN)  , 
(PARAH  (103)  ,S1PTN)  , 
(PABAM  (106)  ,S4PIN)  , 
(PABAM  (1  10) 


(PABAM ( 
(PARAM ( 


(PARAM  ( 89) ,DEL1DH) 

(PAR  AM  ( 92)  , DELFIN)  , 

(PARAH  ( 95)  ,PHIDN)  , 

(PABAM  ( 98) ,DF«2IN) 

(PARAM  (10  1)  ,U3PTN)  , 

(PARAH  (104)  ,S2PIN)  , 

(PARAH  (107)  ,PPRT)  , (PARAH  (108)  , FREQ) 
,TQMAX),  (PAR  AM  (111)  ,AKTQ)  , (PAR  AH  (112)  ,VCIN) 

, (PARAM  (114)  ,DS8CH)  , (PARAH  (115)  ,TST)  , 
(PARAM  (1  17)  , CGAH)  , (PARAH  (118)  ,CS) 


90) ,0EL2DN) 
93)  ,DELRIN) 
(PARAH  (96)  , PHIRN)  , 
(PARAH  ( 99)  ,U1PIN)  , 
(PARAM  (102)  ,U4PIN)  , 
(PARAM  (105)  ,S3PIN)  , 


1 
1 
1 
1 
1 

1 
1 
1 
1 
1 
1 
1 

1 » 

1,  (PARAM(113)  ,SMHT) 

1 (PARAM  (116)  , DSLP)  , 

1 
1 

1 , (PARAM  (124)  ,TS«) 

EQUIV  ALENCE 

1 (PARAH  (1  30)  ,AHCR)  , (PARAM  (131  ), ESP)  , (PARAH  (132)  , AKSL1)  , 

1 (PARAH  (133)  ,AKSL2)  , (P  AR  AM  ( 1 3 4)  , A A1 ) , (PARAM  (135)  ,AA2)  , 

1 (PAR  AH  (136)  ,CCR)  , (PARAM  (137)  , CFCR)  , (PARAM  (1  38)  ,AP)  , 

1 (PARAM  ( 139)  ,EP1)  , (PARAH  (140)  ,EP2)  , 

1 (PARAM  (169)  ,SNT)  , (P  AR  AM  ( 1 70)  , SNSO ) , (P  AR  AH  ( 1 7 1)  ,SNS1)  , 

1 (PARAH  (182)  ,STI  (1)  ) 

EQUIVALENCE  (PAR  AM  (20  2)  , APF  ( 1)  ) , 

1 (PARAM  (206)  ,HDS  (1)  ) 

EQUIVALENCE 


, (PARAM  ( 1 19)  , TQRBR)  , (PARAH  (1  20)  ,TQFBR) 

, (PAEAM(121),  PEL)  , (PARAM  ( 122)  ,TTD)  , (PARAM  (123) 


DSW) 


(PARAM  (204)  ,APR  (1)  ) 


CR1T)  , 
CR3C)  , 
,CR4T)  , 


ARCS)  , (PARAM  (244)  ,AKSR) 
(PARAM  (249)  ,TFK  (1)  ) , 


1 (PARAH  (223)  ,CR1C)  , (PARAH  (224) 

1 (PARAM  (226)  ,CR2T)  , (PARAM  (227) 

1 (PARAM  (229)  ,CR4C)  , (PARAH  (230) 

1 (PARAM  (232)  ,AH2)  , (PARAH  (233)  ,ALAMBD) 

1 (PARAM  (242)  ,AKCF)  , (PARAM  (243) 

EQUIVALENCE  (PAR  AM  (245)  , RB  ( 1)  ) 

1 (PARAM  (252)  ,TRK  (1)  ) , 

1 (PARAH  (255)  ,OFC0)  , (PAEAM(256)  ,0FC1) 

1 (PARAM  (258)  ,0FC3) 

1 (PARAM  (259)  ,ORC0) 

(PARAM  (263)  ,CP0F) 

(PARAM  (266) 

(PARAM  (269) 

(PARAH  (272) 


(PARAM (225) ,CR2C) 
(PARAM  (228)  ,CR3T) 
(PARAM  (231)  ,AH1)  , 


, (PARAM(262) ,QBC3) 

, (PARAM  (260) ,0RC1 ) 

(PARAH (264) ,CP1F) , 

(PARAM  (267)  ,CP1R) 
(PARAH  (270)  ,CR1F) 
(PARAM  (273) 


, (PARAM  (257)  ,0FC2) 
I (PARAH  (261)  ,0RC2) 


,CPOR)  , 
, CROP)  , 


CROE) 


CRIB) 


EQUIVALENCE 
1 (PARAM  (265)  ,CP2F)  , 

1 (FABAH  (268)  ,CP2B)  , 

1 (PABAM  (271)  ,CR2F)  , 

1 (PARAM  (274)  ,CR2R) 

EQUIVALENCE  (RB(1),RB1) 

EQUIVALENCE 
EQUIVALENCE 
EQUIVALENCE 
EQUIVALENCE 
EQUIVALENCE 
1 (PARAH  (284)  , MFC) 

1 (PARAM  (290)  , ROT) 

1 (PARAM  (29  3)  , EA2) 

EQUIVALENCE 

1 (PARAM  (296)  , DEL  IDT)  , (PARAH  (297)  ,DEL2DT)  , (PARAH  (298)  ,DEL3DT)  , 
1 (PARAH  (299)  , DELI)  , (PARAH  (300)  , DEL  2)  , (PABAM  (301)  ,DEL3)  , 

1 (PARAH  (302)  ,PHIRD)  , (PARAM(303)  ,PHIB) , (PARAM  (304) ,DELPM1) , 

1 (PARAH  (305)  ,DELFW2)  , (PARAM  (306)  ,U1P)  , (PARAH  (307)  ,U2P)  , 
1(PARAM(308)  ,U3P),  (PARAH(309)  ,U4P)  , (PARAH(310)  ,S1P)  , 

1 (PARAM  (31  1)  ,S2P)  , (PARAM  (312)  ,S3P)  , (PARAM  (313)  ,S4P)  , 
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(RB(2)  ,BB2) 

(RB  (3)  ,RB3)  , (RB  (4)  ,RB4) 

(TFK  (1)  , AFK1)  , (TRK  ( 1)  , ARKI) 

(TFK(2)  ,AFK2)  , (TRK  (2)  ,ARK2) 

(TFK  (3)  , AFK3)  , (TRK  (3)  , ARK3) 

(PABAM  (285)  ,HBC)  , 

(PABAM  (291  ) ,RAO)  , (PARAH  (292) 
(PARAH  (294)  ,HA3)  , (PARAM  (295) 


,BA1) 

,BA4) 


HODM1080 

MODE1090 

HODE1100 

MODE1110 

MODE1120 

MODE1130 

MODE  114  0 

MOD £11 50 

MODE1160 

MODE  1170 

HOOE1 180 

MODI1190 

MODE  1200 

MODE1210 

MODE1220 

MODE1230 

MODE1240 

MODE  1250  , 

HODI1260 

MODE 1270 

HODE1280 

HODE129C 

HODE1300 

HODE1310 

HOD  11 320 

HODE1330 

MODE  134  0 

MODE  1350 

MODE1 360 

MODE1370 

MODE1  380 

HOD  El  390 

MODE1420 
MODE  14 30 
HODE1440 
, HODE1450 
HODE1460 
MODE1470 
MODE1480 
MODE  1490 
MODE1500 
HODE1510 
MODE1S20 
MODE1530 
KODE1540 
HODE1550 
MODE1560 
HODE1570 
HODE1580 
HODE1590 
MODE1600 
HODE1610 
MODE1620 
MODE1630 
MODE1640 
HODE1650 
MODE1660  j 
HODE1670 I 
HODE1680 ! 


(PABAH (316) ,Q0AN3) 
ABPS4) 
BWZ3A) 


(UGI  (3)  ,UG3) 
(UGI  (4)  ,UG4) 


FBI) 
FB2) 
FB3) 
FB4) 
(VGI  (1) 
(VGI(2) 
(VGI  (3) 
(VGI  (4) 


1 (PABAM  (314)  ,QUAN1)  , (PABAH  (315)  , QUA  M2) 

1 (PARAM  (317)  ,QUAN4)  , (PABAH  (3  18)  ,ABPS3)  , (PABAH  (3  19)  , 
1 (PABAH  (320)  ,RWZ1A)  , (PABAH  (321)  , RHZ2A)  , (PAR AH  (322)  , 
1 (PABAH  (323)  , BWZ4  A)  , (PABAH  (3  24)  , IODT(1)  ) 

EQUIVALENCE  (BWZI  { 1)  ,RHZ1 ) , (ZI  (1)  ,Z1)  , (FBI  (1) 

1 (RWZI  (2)  ,BMZ2)  , (ZI  (2)  ,Z2)  , (FBI  (2) 

1 (RWZI  (3)  ,BWZ3)  , (ZI  (3)  ,Z3)  , (FBI  (3) 

1 (RWZI  (4)  ,RHZ4)  , (ZI  (4)  ,ZU}  , (FBI  (4) 

1 (UI(1)  ,U1)  , (VI(1)  ,V1),  (WI(1)  ,W1)  , (UGI(1)  ,UG1) 

1 (UI(2)  ,U2)  , (VI  (2)  , V2)  , (WI  (2)  ,H2)  , (UGI  (2)  ,UG2) 
1(111(3)  ,U3)  ,(VI(3)  ,V3),  (HI(3),W3), 

1 (UI{4)  ,U4)  , (VI  (4)  ,V4),  (WI(4)  ,W4)  , 

1 (SINPSI  (1)  ,SINPS1)  , (PSII  (1)  rPSIl) 

1)  , (PHI  CGI  (1)  ,PHICG1)  , (CVI(1)  ,CV1) 

1 (SINPSI  (2)  ,SINPS2)  , (PSII  (2)  ,PSI2) 

1)  , (PHICGI  (2)  , PH  ICG  2)  , (CVI  (2)  ,CV2) 

1 (SINPSI  (3)  ,SINPS3)  , (PSII  (3)  ,PSI3) 

1)  , (PHICGI  (3)  r PH  ICG  3)  , (CVI  (3)  ,CV3) 

1 (SINPSI  (4)  ,SINPS4)  , (PSII  (4)  ,PSI4) 

1 ) , (PHICGI  (4)  ,PHICG4)  , (CVI  (4)  ,CV4) 

EQUIVALENCE  ( AM DI  { 1 ) , AH U 1 ) 

1 (AMUI  (2)  , AMU2) 

1 (AMUI  (3)  , AHU3) 

\ (AMUI  (4)  ,AMU4) 

1 (FRIBR  (1)  , FRIER)  , (ALFI(  1)  , 

1)  , (SLIPI(I)  ,SLIP1)  , (AMI  1(1)  ,AM11)  , (AM2l(1)  ,AH21) 

1 (FRIER  (2)  , FR2ER)  , { ALFI  (2 ) , A LF2  ) , (BETIP  (2)  , BET2P) 

1)  , (S  LI  PI  (2)  ,SLIP2)  , (AMI  I (2)  , AM  1 2)  , (AH  21  (2)  ,AM2  2) 

1 (FRIBR  (3)  , FR3BR)  , (ALFI  (3)  , A IF3  ) , ( B ETI P ( 3 ) , B ET  3 P) 

1)  , (SLIPI  (3)  ,SLIP3)  , (AMU  (3)  ,AM  13)  , (AM2I  (3)  , AH23) 

1 (FRIBR  (4)  ,FR4BE)  , (ALFI(4)  ,ALF4)  , (BETIP  (4)  ,BET4P) 

1)  , (SLIP!  (4)  ,SLIP4)  , (A Mil  (4)  , AH  14)  , (AH2I  (4)  ,AM2  4) 


(AKTI  (1)  ,AKT1) 
(AKTI  (2)  ,AKT2) 
(AKTI  (3)  ,AKT3) 
(AKTI(4)  ,AKT4) 
.VGI)  , 

.VG2)  , 
rVG3)  , 


HODE1690 

HODE1700 


, HODE1730 
,HODE1740 
, HODE1750 
, HODE176C 
HODE1770 
MODE1780 
HODE1790 
HODEIflOO 


.VG4)  , 

(COS  PSI  (1)  , COS  PS  1)  , (OGIP  { 1)  , OG1PHODE1810 
(ABI (1)  , AB1)  , (BETAI (1)  ,BETA1)  , MOD  El  820 
(COS  PSI  (2)  , COSPS2)  , (OGIP  (2)  , UG2  PHODE18  30 
(ABI  (2)  ,AB2)  , (BETAI  (2)  ,BETA2)  , HOD  El  840 
(COSPST  (3)  ,COSPS3)  . (OGIP  (3)  , UG  3P  HOD E 1 850 
(ABI  (3)  , AES)  , (BETAI  (3)  ,BETA3)  , MODE1860 
(COS  PSI  (4)  ,COSPS4)  , (UGIP(4)  , UG4PHOD  E 1 870 
(ABI  (4)  , AB4)  , (BETAI  (4)  ,BETA4)  HODE1880 
(SNI  (1 ) ,SN1  ) , (RMI(  1)  , RMI)  , (GBI  { 1)  , GB1)  , HODE189C 
(SNI  (2)  ,SN2)  , (RMI  (2)  ,BM2)  , (GBI  { 2)  , Q B2)  , MODE  1900 
(SNI  (3)  ,SN3)  , (RMI  (3)  ,BH3)  , (GBI  (3)  ,GB3)  , MODE  19  10 
(SMI  (4)  rSN4)  , (RHI(4)  ,RH4)  , (GBI(4),GB4)  , MODE  1920 


ALFI)  , (BETIP  (1)  , BETIP) 


(BETIBR(I)  ,BET13RHODE1930 
(001  (1)  ,001)  , HODE1940 
(EETIER (2) ,BET2BRMODE1950 
(OOI (2) ,U02) , MODE1960 
(BPTIBR(3) ,BET3BRHODE1970 
(OOl  (3)  ,003)  , MODE1980 
(BETIBR  (4)  ,BET4BRHODE1990 
(OOI  (4)  ,004)  , HODE20CC 


1 (Oil  (1)  ,01  1) 

1. 

1 (Oil  (2)  ,012) 

1, 

1 (Oil  { 3)  ,013) 

1, 

1 (01I  (4)  ,014) 
EQOIVALENCE 

1 

1 
1 

1 (FCIMAI  (1)  ,FC1MAX) 
1 (FCIM  AX  (2)  ,FC2MAX) 


(BAMI  (2)  ,BAM2)  , (SII  (2)  ,ST2)  , (SAMI  (2)  ,SAM2) 
(BAHI  (3)  ,BAH3)  , (SII(3)  ,SI3)  , (SAMI  (3)  ,SAH3) 


(BAMI  (1)  ,BAK1)  , (SII{  1)  ,SI  1)  , (SAMI  (1)  ,SAM1)  , (FI  (1)  ,F1)  HODE2010 

MODE2020 
(FI  (2)  ,F2)  MODE2030 
HODE2040 
(FI  (3)  ,F3)  MODE2C50 
HODE2060 
(FI  (4)  ,F4)  HODE2070 
(FCI(  1)  , FC1) 

(FCI  (2)  ,FC2) 

(FCI (3) , FC3) ,HODE2100 
(FCI  (4)  , FC4)  , MODE 2 110 
HODE2120 


, (BAMI  (4)  ,BAH4)  , (SII(4)  , SI  4)  , 
(FXOI  (1)  ,FXU1)  , (PYOI  (1)  ,FY01) 
tFXUI  (2)  , FX02) 

(FXOI  (3)  ,FX03) 

(FXOI  (4)  ,FX04) 

(FSI  (1)  , FSI) 

(FSI  (2)  ,FS2) 


(FYOI(2)  ,FY02) 
(FY0I(3)  ,FY03) 
(FYOI  (4)  ,FY04) 


(SAMI  (4)  , SAM4) 
, (GI  (1)  ,G1) 

, (GI (2) ,G2) 

, (GI  (3)  ,G3) 

, (GI  (4)  ,G4) 


, HODE2C8C 
, MODE2090 


1 (FCIBAX  (3)  ,FC3HAX) 

1 (FCIHAX(4)  ,FC4MAX) 
EQOIVALENCE  (ZIP(1),Z1P) 


, (FSI  (3)  ,FS3) 
, (FSI  (4)  ,FS4) 


(ZIP(2)  ,Z2P)  , 
(ZIP(3),Z3P), 
(ZIP  (4)  ,Z4P)  , 


EQUIVALENCE 


(PHII  (1)  , PHI1) 
(PHII (2) , PHI2) 
(PHII  (3) 

(PHII  (4) 


, PHI3) 
, PHI4) 


(DL2S,  DLIS  (2)  ) , (DL  3S  , DLIS  ( 3)  ) 


(DL1S,  DLIS  (1)  ) 

(DL4S,DLIS(4)  ) 

(PHIFD,DEL2DT)  ,(PHIF,DEL2) 

(PHIRD,  DEL4DT)  , (PHIR,  DEL4) 

(DLSOSI  (1)  ,DLSOS1)  , (DLSOSI  (2)  ,DLSUS2) 
(DLSUSI  (3)  , DLSOS3)  , (DLSOSI  (4)  , DLSOS4) 
DATA  RAD/0.  1745329E-V 
DATA  MPHIPS/17.6/ 

EEAL*4  HPHIPS 


EQOIV  ALENCF 
EQOIV  ALENCE 
EQOIVALENCE 


HODE2130 

HODE2140 

MODE215C 

HODE2160 

HODE2170 

HODE2180 

HODE2190 

HODE2200 

HODE2210 

HODE2220 

HODE2230 

HODE2240 

HODE2250 

HODE2260 

HODE2270 

HODE2280 
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c 

c 

c 

c 


REAL*4  MUP  ,M0S(2W8B(4)  ,TFK(3)  ^fSKCa)  ,SII<4)  ,APF(2)  ,APB  (2) 
REAL*4  LAFC,IAFT,LABC,LABT 
BEAL*4  AKTI(4) 

SEAL*4  ATRACK(2000) 

INTEGEfi^2  ITS A A (50) ,ITRNA (50) ,ITRIA (50) ,DACPLA (48)  , ADCPLA(48) 
INTEGER+2  NAHDAC(48) ,NAHADC(48) ,IDAC(48) ,IADC(48) , ADCSOH ,DACN0H 
REAL*4  IOUT(48)  SCAIAC  (48 ) ,SCALDC (48) 

REAL*4  BVAtnE{2) 

REAI*4  DLS0SI(4) 

INTEGEB+2  RTSW  ,,RBSH  ,LETSM  ,OPEN 


MODE2290 

MODE2300 

KODE2310 

MODE2320 

HODE2330 

MODE2340 

MODE235C 

HODE2360 

HODE2370 

EODE2380 


USE  A/D  READ  VALUES  HODE2400 

CHECK  FOR  A/D  OVER  RAHGE  HODE2410 


DO  10100  I=1,ADCNU8 
SADCO  = IN  (I) 

IN(I)  = A«AX1  (-.9998,  (AHIN  1 (.  9998,  IN  (I)  ) > ) 

IF(SADCO.EQ.  IN(I))  GO  TO  10105 
lADCK  = IADCK+1 
IF (lADCK.GE. 10)  lADCK  = 10 
lERADC  (lADCK)  = I 
TERADC  (lADCK)  = TINE 
10105  CONTINUE 

.EVALUE(ADCPLA(I)  ) =IN  (I)  ♦SCALAC  (I) 

10100  CONTINUE 
IHSW=1 

TIME=FLOAT  (JJTINE)  *DT 
JJTIME=JJTIME+1 
ENTRY  SEPG22 
ISW=1 

IF  (TIME.GT.O.)  GO  TO  6 
DO  5 K= 1,4 
FSI  (K)  = 0. 

ALTQ(K)  = 0. 

ZIMX(K)  = 100. 

5 CONTINUE 
PHIDMX  = 0. 

CONVRT  = 1./MPHIPS 

C AERODYNAMIC  INITIALIZATION  VARIABLES 

SFXS  =0. 

SFYS  =0. 

SFZS  =0. 

SNTHES=0. 

SNPHIS  =0, 

SNPSIS=0. 

C DUAL  TIRE  INITIALIZATION  VAEIABIES 

ALTQ5=0.0 
ALTQ6=0.0 
FSI3=0.0 
FSI4=0.0 
FSI5=0.0 
FSI6=0.0 
FXD5=0.0 
FXU6=0.0 
FYU5=0 .0 
FyU6=0.0 

NBHP=PARAM (277) 40.5 

6 CONTINUE 

C FUNCTION:  PSIFNT-COEFFICIENTS  TO  A POLYNOMIAL  FIT  OF  FRONT  WHEEL 

C TOE-IN  AS  A FUNCTION  OF  SUSPENSION  DEFLECTION  (DELI) 
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MODE2430 
MODE2440 
MODE2450 
MODF246C 
SODE2470 
HODE2480 
HODE249C 
MODE2500 
HODE2510 
HODE2520 
HODE2530 
MODI 2 540 
MODE2S50 
MODE256C 
MODE2570 
MODE25B0 
MCDE2590 
MODE26CC 
MODE2610 
MODE2620 
MODE2630 
MODE2640 
MODE265C 
HODE2660 
MODE2670 
HODS2680 
MODE2690 
HODE27C0 
MODE2710 
MODE2720 
MO0E273O 
MODE2740 
SODE2750 
MODE2760 
BODE2770 
HODE2780 
MODE2790 
MODE2800 
MODE2810 
HODE2820 
MODB2830 
MODE2840 
HODE2850 
MODE2860 
CMODE2870 
CMODE2880 


non 


C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


c 


c 

c 

c 

c 

c 

c 

c 

c 

c 


c 

c 

c 

c 

c 

c 

c 

c 

c 


INPUTS:  PSIPNT- (DEGREES/INCH) 

DELI- (INCHES) 

4i  * 1(1  4c  ««  4c  4i * 4>  **  i 4>  ♦ 4< « 4<  4>  >|M»  4<  * 4> ««  4m*  «**«♦«««*  4>  4>  ««  4<  4< 

INC'REftSING  THE  SPRUNG  flASS  OVER  THAT  FOR  WHICH  THE  STATIC  WHEEL 
DEFLECTION  IS  MEASURED,  HELDS  A DELFIN  AND  A DELRIN  WHICH 
IS  A NEGATIVE  NUMBER 

4ti**4c*i*4[«i*4r4ci*4M*4c^4c4c4i4i4c4i4c4c4c4c4ci*4<4c4c4c4c4c4ci*4c*4>4c4c4c4c4c«4c4<4<4c4c4>4c4c4i4c4c4c4M*4<4c4c4>4c4c 

DELFIN  AND  DELRIN  REPRESENT  A CHANGE  IN  STATIC  DISPLACEMENT 
OF  THE  FRONT  AND  REAR  WHEELS  DUE  TO  LOAD  CONFIGURATIONS 
OUTPUTS:  POLY- (DEGREES) 


DLIS  (1=1, 2, 3, 4)  IS  THE  SUSPENSION 
TO  THE  UNLOADED  POSITION  FOR 
= DELI  ♦ DELFIN 
DELFIN 
DELRIN 
DELRIN 


DEFLECTION 
WHEEL  I 


RELATIVE 


DLIS 

DL2S 

CL3S 

DL4S 


= DEL2 
= DEL3 
= DEL4 
DLSUS 1=DL1S 
DLSUS2=DL2S 
DLSUS3=DL3S 
DLSUS4=DL4S 
lAX  = 0 SOLID  FRONT 

= 1 INDEPENDENT 

= 2 INDEPENDENT 
IF(IAX.EQ.O)  DLIS  = DLl S ♦ 
IF(IAX.EQ.O)  DL2S  = DELI  ♦ 
IF  (lAX .LE.  1)  DL3S  = DL3S 
IF(IAX.LE.I)  DL4S  = DEL3  ♦ 
SUSPENS-ION  DEFLECTIONS  FOB 
IF(IAX.EQ.O)  DLSUS1  = 

IF (lAX.EQ.O)  DLSUS2  = 


AND  REAR  SUSPENSIONS 
FRONT  AND  SOLID  REAR  SUSPENSIONS 
FRONT  AND  REAR  SUSPENSIONS 
TF02+PHIF 

DELFIN  - TF02*PHIF 
+ TR02*FHIR 
EELBIN  - TR02*PHIR 
SPRING  FORCES 
DLSUS1  + TSF»PHIF/2. 

DELI  ♦ DELFIN  - TSF*PHIF/2. 


IF  (lAX.LF. 1) DLSUS3=DLSUS3>TS02*PHIB 
IF(IAX.LE.I)  DLSUS4  = DEL3  ♦ DEIRIN  -TS02*PHIR 
PSI1  = DELFWU  (POLY  (DLIS,  PSIFNT)  ) *RAD4-EPSK  1 
PSI2=DELFW2-  (POLY  (D12S, PSIFNT)  ) ♦RAD+EPSK2 
PSI3S  = AKR3*PHIB 
PSI4S  = AKRS*PHIR 


FUNCTION:  PHIFNT-C0EPFICIENT5  TO  A POLYNOMIAL  FIT  OF  FRONT  WHEEL 

CAMBER  AS  A FUNCTION  OF  SUSPENSION  DEFLECTION  (DELI) 

INPUTS:  PHIPNT- (DEGREES/INCH) 

DELI-  (INCHES) 


OUTPUTS:  POLY- (DEGREES) 


CHODE2890 

CHODE2900 

MODE2910 

MODE2920 

MODE2930 

MODE2940 

HODE2950 

HODE2960 

MODE2970 


HOD 

E2980 

CHOD 

E2990 

CMOD 

E3000 

MOD 

E3010 

MOD 

E3020 

MOD 

E3030 

MOD 

E3040 

HOD 

E3C50 

HOD 

E3060 

MOD 

E3070 

HOD 

E3C80 

MOD 

E3090 

MOD 

E3100 

MOD 

E3110 

HOD 

E3120 

MOD 

E3130 

HOD 

E3140 

MOD 

E3  150 

MOD 

E3160 

HOD 

E3170 

MOD 

E3180 

MOD 

E3190 

MOD 

E3200 

HODE3210 

MODE322C 

HODE3230 

MODE3240 

HODE3250 

HODE3260 

CMODE327C 

CMODE3280 

CHODE3290 

CMODE3300 

CMODE3310 

MODE332C 

MODE3330 

CHODE3340 

CMODE3350 


PHI1=  (POLY  (DLIS, PHIFNT)  ) ♦RAD+SIGN  ( 1.  ,FS  1)  *PEE1 
PHI2=  (-POLY  (DL2S, PHIFNT)  ) ♦Rac+SIGN  (1 . , FS2)  4cFEE2 
FHI3=PHIR 
PHI4=PHIR 

FUNCTION:  THEFNT-CASTER  AS  A FUNCTION  OF  SUSPENSION 

DEFLECTION  (DELI) 

INPUTS:  THEFNT  (CEGREES/INCH) 

DELI-  (INCHES) 

OUTPUT:  POLY- (DEGREES) 


MODE3380 
MODE3390 
CMODE3400 
CHODE34 10 
CHODE3420 
CHODE3430 
CHODE3440 
CHODE3450 
CMODE346G/ 
CHODE3470|' 
CMODE3480) 
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n n n 


THS1= (P0LY(BL1S,THEFNT) ) ♦RAD^THEl 
THS2=  (POLY  (DL2S,THEFNT) ) ♦RAD+THE2 


C 

C 

C 

C 

C 

C 

C 

C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


FONCTION: 

INPUTS : 

OUTPUTS: 

FUNCTION: 

INPUTS: 

OUTPUTS: 


PSIRR-COEFFICIENTS  TO  A POLYNOMIAL  PIT  OP  REAR  WHEEL 
TOE-IN  AS  A FUNCTION  OP  SUSPENSION  DEFLECTION  (DELI) 

PSIRR-  (DEGREES/INCH) 

DELI- (INCHES) 

POLY-  (DEGREES) 


PHIRF-COEFFICIENTS  TO  A POLYNOMIAL  FIT  OF  BEAR  WHEEL 
CAMBER  AS  A FUNCTION  OF  SUSPENSION  DEFLECTION  (DELI) 

PHIRR-(DEGREES/INCH) 

DELI-  (INCHES) 

POLY-  (DEGREES) 


IF  (lAX.LE. 1) GO  TO  7843 
PSI3S  = POLY  (DL-3S,  PSIRR)  *RAD 
PSI4S  = -POLY (DL4S , PSIRR) *RAD 
,FHI3  , = POLY  (DL3S  , FHIRR)  *FAD 
PHIU=-POLY (DL4S,PHIRR) *RAD 

7843  CONTINUE 
IF(IAX.NE.O.)  GO  TO  7844 
PSI1  = DELFW1-AKFS*PHIF*EPSK1 
PSI2  = DELPH2-AKFS+PHIF+EPSK2 
PHI1  = PHIF+FEE1 

EHI2  = PHIF+FEE2 

7844  CONTINUE 
PHS1=YHS1*PHI1 
PHS2=YHS2+PHI2 

C CALCULATION  CF  FRONT  BUMP  STOP  FORCES 

FBS1  = XINT  (DLSUS1  , DELSF1,  FCLS  F1,  NDELF1) 

FBS1  = FBS1  - AKP1*DLSUS1 

FBS2  = XINT(DLSUS2,DELSF2, FDLSF2, NDELF2) 

FBS2  = FBS2  - AKF2+DLSUS2 
C CALCULATION  OF  REAR  BUMP  STOP  FORCES 

FBS3  = XINT (DLS0S3,DELSR3, FCLSP3, NDELR3) 

FBS3  = FBS3  - AKR3fDLSUS3 

FBS4  = XINT(DLSUS4,DELSR4,FELSR4,NEELR4) 

FBS4  = FBS4  - AKR4*DLSUS4 
NNN=PARAH  (198)  / (PARAM  (75)  *U  ) +0 . 5 
100  TM1=Z-A*THE 
TM2=TF02*PHI 
Z1PP=TM1+TM2 
Z1  P=Z1  PP4-ZF 
Z1=Z1P*DEL1  - DELX  (1) 

IF  (lAX. EQ. 0. ) Z1  = Z1  ♦ TF02*PHIF 

7,2PP=TB1-TM2 

Z2P=Z2FP+ZF 

Z2=Z2P  + DEL2  -DELX  (2) 

IF(IAX.EQ.O.)  Z2  = Z2  - TF02*PHIF  - DEL2  + DELI 


FOR  DUAL  TIRES,  TH02 


(T0R02  + TIR02)  /2. 


TH1=Z+B*THE 

TM2=TR02*PHI 


HODE3490 

BODE3500 

CMODE3510 

CBODE3520 

CBODE3530 

CMODE3540 

CBODE3550 

CBODE3560 

CBODE3570 

CBODE3580 

CBODE3590 

CBODE3600 

CHODE3610 

CBODE3620 

CBODE3630 

CMODE364C 

CBODE3650 

CMODE366C 

CMODE3670 

CMODE368C 

HODE3690 

SODE37C0 

MODE3710 

fiODE372G 

MODE373C 

MODE3740 

MODE3750 

BODE376C 

HODE3770 

BODE378C 

BOOE3790 

MODE3800 

BODE3810 

BODE3820 

BODE3830 


BODE3880 


HODB393C 

BODE3940 

BODI3950 

HODE3960 

BODE3970 

HODE3990 

BODE4000 

HODEaCIO 

HODE4030 

BODE4040 

BODE4050 

BODE4C60 

MODE4070 

HODE4O0O 
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HODE4090 

HODE4100 


*» 


Z3PP=TM1+TM2 
Z3P=Z3PP+ZR 
Z3=Z3P+DEL3  -DELX(3) 


IF  (TAX. LE. 1) Z3=Z3*TB02*PHIB*DEL3-DEL3 

HODE4120 

Z4PP=TH1-Tn2 

nODE4130 

Z4  E>=Z4PPf  ZR 
Z4=Z4P*DEL4  -DELX(4) 

nODE4  140 

IF  (I AX  .LE.  1)  Z'4  = Z4-TR02*PHIR  + DEL3-DEL4 

HODE4 160 

DO  20  K=1,4 

IF  (PAHAH  (180)  .EQ.,4.)  PWZI  (K)  = P AR  A « ( K<- 3 1 9) 

IF(PAEAM(180)  .LT.4.) P«ZI  (K)  = RH  ♦ ZI(K) 

KODE4170 

IF  (R«ZI  (K)  . LT.  ZIMX  (K)  ) ZIMX(K)  = RHZI(K) 

HODE4190 

FRI{K)  = 0. 

HODE4200 

IF(RWZI(K)  .GT.O.)  PBI{K)  = AKTI(K)  ♦ RHZI(K) 

HODE4210 

CONTINUE 

HODE4220 

Til  1 = U^ZF*Q 

HODE4230 

TM2=TF02*R 

HODE4240 

U1=TH 1-TM2 

MODE4250 

U2=TM1 +TM2 

HODE4260 

TM 1=U+ZR*Q 

HODE4270 

TE2=TR02*R 

HODE4280 

U3=Tn1-TH2 

MODE4290 

D4=TH1*T«2 

HODE430C 

VARZFP=V+A*R-ZF*P 

HODE4310 

VBBZRP=V-E*R-ZR*P 

HODE4  320 

FPHIR=P 

nODE4330 

IF(IAX.LE.  1)  PPHIR=PVPHIRD 

HODE4  34C 

PPHTF  = P 

HODE4350 

IF(IAX.EQ.O)  PPHIF  = P + PHIFD 

HODE4360 

V1  = VARZFP  ♦ Z1*PPHIP 

MODE4370 

V2  = VARZFP  + Z2*PPHIF 

HODE4380 

V3=VBRZP.P  + Z3*PPHIR 

HODE4390 

V4=VBRZRP+Z4*PPHIB 

HODE4400 

HAQ=W-A*Q 

HODE4410 

HBQ  = W + B*Q 

HODE4420 

TF2P  = TF02*PPHIF 

WODE4430 

TR2P  = TR02*PPHIR 

HODE4440 

Wl=WAQfTF2P+EEL1CT 

HODE4450 

W2=WAQ-TF2P+DEL2DT 

HODE4460 

IF(TAX.EQ.O)  W2  = W2  ♦ DELICT  - DEL2DT 

MODE4470 

W3  = WBQ  TR2P  *■  DEL3DT 

HODE4480 

m ^ WBQ  - TP2P  ♦ CEL3DT 

HODE4490 

IF(IAX.EQ.2)  W4  = «4  + DEL4DT  ~ DE13DT 

HODE4500 

IF  (IDOLTR.  EQ.  1)  ALTQ  (3)  = ALTQ  (3) /2. 

MODE4510 

IF  (IDULTR.EQ.  1)  ALTQ(4)  = ALTQ(4)/2. 

HODE4520 

PSI3  = PSI3S+  ALTQ(3)*AKSP 

NODE45.30 

FSI4  = PSI4S+  ALTQ(4)*AKSP 

HODE4540 

DO  30  K=1,4 

HODE4550 

UGI(K)  = OI(K)  + THE^WI(K) 

HODE4560 

VGI(K)  = VI  (K)  - PHT*ai(K) 

flODE4570 

SINPSI  (K)  = SIN  (PSII  (K)  ) 

HODE4580 

COSPSI  (K)  = COS  (PSII  (K)) 

HODE4590 

DGIP(K)  = OGI(K)  * COSPSI  (K)  + VGI  (K)  * SINPSI  (K) 

HODE4600 

CONTINUE 

nODE4610 

CZ=COS  (PSI) 

HODE4620 

SN=SIN  (PSI) 

HODE4630 

DO  40  K=1,4 

HODE4640 

CVI(K)  = SQBT(UI  (K)  *01  (K)  ♦ VI  ( K)  *VI  (K)  ) +CONV RT 

HODE4650 

ABI  (K)  = ABS  (DGI  (K)  ) 

HODE4660I 

BETAI  (K)  = ATAN  (VGI  (K)/ABI  (K))  - PSII  (K)  *UGI  (K) /ABI  (K) 
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HODE4670' 

non  onnnnnooD 


40 

C 


3497 


3498 

C 


11 


4280 


SNI<K)  = SNSO  / SHT 
CONTINUE 

INTFUN  IS  USED  FOR  ROAD  PATCH  WITH  VARYING  COEFFICIENT  OF  FRICTION 

INTFUN=PARAH(172) +0.5 

IF  (INTFUN. EQ.O)  GO  TO  3497 

IF  (INTFUN .NE . 1)  GO  TO  3498 

X1=A*CZ-TF02*SN  +X 

X2=^A*CZ+TF02*SN 

X3=“B*CZ-TR02*SN 

X4=-B*CZ+TR02*SN+X 

TEMP  = PARAI1  (173)  ♦PARAH  (174) 

TEHP=TERP*12.0 
PPPP  = PARAM  (173) *12.0 


.AND. XI .LB. TEMP) SN1=SNS1/S NT 
. AND. X2.LE.TEMP) SN2=SNS1/SNT 
.AND. X3 .IE. TEMP) SN3=SNS1/S NT 
. AND. X4.LE. TEMP) SN4=SNS1/SNT 


IF  (XI .GT.PPPP 
IF  (X2.  GT.  PPPP 
IF  (X3. GT.PPPP 
IF  (X4.  GT.  PPPP 
GO  TO  3498 
CONTINUE 

YY  1=A*SN  + TF02*CZ  +Y 
Y2=A*S N-TF02*CZ  »Y 
Y3=-B*SN+TRp2*CZ  +Y 
Y4=-B*SN-TR02*CZ+Y 
JF  (YY1.LT.0.0)SN1  = SNS1/SNT 
IF(Y2 .LT.O.O) SN2=SNS1/SNT 
IF  (Y3. IT. 0.0) SN3=SNS1/SNT 
IF  (Y4.LT.0.0)SN4=SNS1/SNT 
CONTINUE 

PARAH(314  -317)  ARE  EQUIVALENCED 
DO  11  K=1,4 

SLIPI  (K)  = PARAM  (K  ♦ 31 3) 

IF(SLIPI(K)  .LT.  (-1  .)  .OR. SLIPI (K) .GT.1. ) 
CONTINUE 

CALCULATION  CF  SIDE  FORCE  FRICTION  COEFF 
CALL  LFFIC 


CIRCUMFERENTIAL  FRICTION  COEFF  CALCULATION 
CALL  CFRIC 

ALIGNING  TORQUE  CALCULATIONS 
OVER-TURNING  MOMENT  CALCULATIONS 


TO  QUAN1 


SLIPI (K) =SIGN  (1 .,SLIPI  (K) ) 


DO  4280  K=1,2 

ALTQ  (K)  =AFK1*FSI  (K)  >fFSI  (K) +SIGN  (1  . ,FSI  (K)  ) *FSI  (K)  ♦FSI  (K)  *AFK2 
1 +SIGN(1.  ,PHICGI  (K) ) *FRI (K)  *SQRT(ABS (PHICGI  (K) ) ) *AFK3 
OTM(K)  =FRI  (K)  ♦(OFCl*FSI(K)  4-OfC2  ♦FSI  (K)  *ABS  (PHICGI(K)) 

1 ♦OFC3+PHICGI  (K) ) 

IF  (IDULTR. EQ. 1)  GO  TO  4280 
KK=  K+2 

ALTQ  (KK)=ARK1*FBI  (KK)  ♦FSI(KK)  +SIGN  (1.  , FS  I (KK)  ) ♦FSI  ( KK)  *F  SI  (KK) 

1«ARK2 

1 *SIGN(1.  ,PHICGI (KK)  ) ♦FRI (NK)^SQRT (ABS  (PHICGI  (KK) ) ) *ARK3 
OTH  (KK)=PRI  (KK)  ♦ (ORC1*FSI  (KK)  +ORC2«FSI  (KK)  *ABS  (PHI CGI  (KK)  ) i-ORCa 
1 ♦PHICGI(KK)) 

CONTINUE 

DUAL  TIRES  ON  SOLID  REAR  AXLE 

IDULTR  = 0,  NO  DUALS 
= 1,  DUALS 
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MODI4680 

HODE4690 

HODE4700 

HODE4710 

MODE4720 

MODE473C 

MODE4740 

MODE4750 

MODE4760 

MODE4770 

MODE4780 

HODE479Q 

HODE4800 

MODE4810 

HODE4820 

MODE4830 

MODE4840 

MODE4850 

MODE4860 

MODE487C 

HODE4880 

MODE4890 

MODE49C0 

MODE49  10 

MODE492C 

MODE4930 

MODE4940 

NODI4950 

MOD £4960 

MODE4970 

MODE4980 

HODE4990 

MODE5000 

MODE5010 

MODE5020 

MODE5030 

MODE5C40 

HODE5050 

MODE5C60 

MODE5070 

MODE5C80 

MODE5090 

MODE5100 

HODE5110 

MODE5120 

HODE5130 

HODE5140 

MODE5150 

MODE5160 

MODE5170 

MODS518C 

MODE5190 

MODE5200 

MODE5210 

HODE5220. 

BOD15230 

MODE5240 

nODE5250i 

MODE5260 

MODE5270 


I 


ono  onn  on  nnnoo-t=  on  non 


IF  (IDULTR.EQ. 1)  CALL  DUAL 

C 

SALTO=ALTQ  (1)  +ALTQ  (2)  +ALTQ(3)  +ALTQ  (4) 

FOTM=OTM  ( 1)  +OTM  (2) 
fiOTM=OTn  (3)  ♦CTH  (4) 

AERODYNAMIC  FORCES  AND  MOMENTS  - SFXS , SFYS , S F2S , S NPHIS ,S NT HES , SN PS IS 

IF  (lAERO.EQ.  1)  CALL  AERODY 

SFXD=FXDUFX02*FXU3+f  XU4  + FXU5+FXU6  + SFXS 
SFYU=FYU1  +PY02  + FYU  3 + FYD4  + FYD5+FY0  6 4-SFYS 

YAW  AND  PITCH  MOMENT  CALCULATIONS  FOR  INDEPENDENT  FRONT  AND 
REAR  SUSPENSIONS 

SNPSIU  = A*  (FYU1  + FYU2)  -B*  (FYU3+FYU4)  4-TF0  2*  (FXU2-FXU  1) 

1 +TF02+ (FXU4-FX03)  > SALTQ  SNPSIS 

SNTHEU  = A*  (S1P+S2P)  -E* (S3P  + S4P)  -PXU  1*Z 1PP-FXU2^Z2PP 
1 -FXU3*Z3PP-FXU4*Z4PP  + SNTHES 

IF (IDDLTR. NE. 1)  CO  TO  4282 

SNPSIU  = A*  (FYO  UFYU2) -B*  (FYU3  + PYU4+FYD54-PY06)  + (FXU2-FXU1)  ♦TF02 
1 +(FXU4-FXU3)  ♦TIR024- {FXU6-FXU5)+T0B02+SALTQ*SNPSIS 
282  CONTINUE 

lAX  = 0 SOLID  FRONT  AND  REAR  SUSPENSIONS 

= 1 INDEPENDENT  FRONT  AND  SOLID  REAR  SUSPENSIONS 
= 2 INDEPENDENT  FRONT  AND  REAR  SUSPENSIONS 
GO  TO  (4287,4288) , lAX 

ROLL  MOMENT  CALCULATION  FOR  SOLID  FRONT  AND  REAR  SUSPENSIONS 
NO  DUALS 

SNPHI  U=TSF02*  (S2P-S1P)  +TS02*  (S  4P-S  3P)  - (FYUUFYU2)*  (ZF«-DEL1) 

1 - (FYn3+FYU4  + FYU5*FYU6)  ♦ (ZR  + DEL3)  +3NPHIS 

IF (IDULTR. NE. 1)  GO  TO  4281 

PITCH  MOMENT  CALCULATION  FOR  SOLID  FRONT  AND  REAR  SUSPENSIONS 
REAR  DUAL  TIRES 

SNTHEU  = A*  (S1P+S2P)  -B*{S3P  + S4P)  “FXU  1*Z 1PP-FXU2*Z2PP 
1 ♦FXU3* (ZR  + DEL3  + TIR02+PHIR-Z3ID)  ' 

UFXU4* (ZR+DEL3-TIR02*PHIR-Z4ID) +FXU5* (ZR+DEL3+T0R02*PHIR-Z50D) 


1 ♦FXU6*  (ZR  + DEL3-TOR02*PHIR-Z60D) 

4281  CONTINUE 

GO  TO  4289 

4287  IF  (IDULTR. NE. 1)  GO  TO  4290 

YAW, ROLL  AND  PITCH  MOMENT  CALCULATIONS 
SOLID  BEAR  SUSPENSIONS 
REAR  DUAL  TIRES 

SNPHITJ  = TF02*  (S2P-S  IP)  ♦TS02*  (S4 P-S3P ) 


+SNTHES 


FOR  INDEPENDENT  FRONT  AND 


+ FYU 1*  (ZIPP+HFC) 


1 * FYU2*  (Z2PP  + HFC)  ~ (FYU3+ FYU4+ FYU5+FYU6)  ♦ (ZR  + DEL3) 

1 ♦ FOTH+SNPHIS 

SNTHEU  = A* (S1P+S2P)  -E*(S3P+S4P)  - FXU  1*Z 1 PP- F XU2*Z2PP 
1 ♦FXU3*  (ZR<-DEL3+TIR02*PHIR-Z3ID) 

1+FXU4* (Ze+DE13-TIR02*PHIR-Z4ID) +FX05» (ZR +DEL3+T0R02*PHIR-Z50d) 
1 *PXU6*  (ZR  + DEL3-T0R02YPHIR-Z60D)  +SNTHES 

GO  TO  4289 

POLL  MOMENT  CALCULATION  FOR  INDEPENDENT  FRONT  AND  SOLID 
REAR  SUSPENSIONS 
NO  DUALS 

4290  SNPHI0=TPO2*  (S2P-S  IP) +1302*  (S4  P-S3P) -t-FYU  1*  (ZiPP+HFC) 

1 ♦FY02*(Z2PP4HFC) 


1 

1 + FOTH  + SNPHIS 
GO  TO  4289 

ROLL  MOMENT  CALCULATION 


- (FYU3+FYU4) ♦ (DEL3  + HRC+ZR) 


FOR  INDEPENDENT  FRONT 


AMD 
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HEAR  SUSPENSIONS 


MODE5280 

HODE5290 

MODE5300 

MODE5310 

MODE5320 

HODE5330 

HODE5340 

HODE5350 

HODE5360' 

HODE5370 

HODE530O 

MODE5390 

MODE5400 

HODE5410 

HODE5420 

MODE543C 

MODE5440 

MODE5450 

MODE5460 

MODE547C 

HODE5480 

MODE5490 

MODE5SOO 

MODE5‘=10 

HODE5520 

MODE553C 

MODE5540 

MODE5550 

HODE5560 

MODE5570 

MODE558C 

HODE5590 

HODE5600 

MODE5610 

MODE5620 

HODE563C 

MODE5640 

MODE5650 

HODE566C 

HODE5670 

HODE5680 

MODB5690 

HODE5700 

HODE571G 

MODE5720 

HODE5730 

HODE5740 

MODE5750 

MODE5760 

MODE5770 

MODE5780 

HODE5790 

HODE5800 

HODE5810 

HODE5820 

MODE5830 

HODE5840 

HODE5850 

MODE5860 

BODE5870 


o n n no 


4288 


4289 

C 


101 


7C02 

7C03 

7CC4 

7001 

7005 

C 

c *** 

c 

c 


♦ ♦♦ 


8498 

8499 


SNPHI0=TFO2* {S2P-S1P) ♦TR02* {S4 P“S3 P) ♦FYO (ZlPPt^FC) 

♦ FY02*(Z2PP*HFC)  ♦FYU3^‘^^3PP>HRC) 4PY04*  (Z4PPffifiCi 
♦ FOTM+ROTH  ♦ SNPHIS  , ' r ^ ^ 

CONTINDE 

KINEMATIC  CALCDLATIONS 

IF(ISW.EQ.3)  GO  TO  7005 

QDT=  (SFXU/SH-SNTHEO/GAM2)  *ONEOA 

UDT=V*R-W*Q-G*THE*  A1  *S STHBU/GAH2)  *ONEOA 

NDT=U*Q-V*P- (SlP+S2Pf||p*^4§^'^^F43f/iPfS  ' " 

TMP=H*P-0*R4G*PHI  P S ?‘£  S J / A ’ 

D1=SR*THP+SF YD 
C2=-GAM3*THP+SNPHI^ 

D3=GAH1*THP  + SNP5i;i:,p 
VDT=(D1+E1+D 
PDT= (“D1*E2*D2* 

RDT=  (D1*E34-D2+G 
PHIDT=P*R*THE  ‘ 


2 OTlI  «-p3  *GV  2)  *ON  SO  D 

’ U'3rJ^'.,€Tr  At'EOD 


THEDT=Q-R*PHI 
FSIDT=R  ♦ Q*PHI 
XDT=U*CZ- V»SN 
yDT=U*SN+V*C7 

Z D T=  W - U ♦ T H E.-6-  Y 

ANUMDT  ^ SQa:,T(,,tf4V  > 7*  ♦2) 

. ADENDT=  (FClRAX'iECZifM+CciMA 
ISWPQ=PARA.n  ■ C.-',;  - ?■■■  -.  MAX) 

ISWPQ=ISH,P.Q*iT  ' ' 

GO  TO  (700^1  p7,aCt2,, 1(303^7004)  ^.ISilPQ 
GO  TO  7001  ‘ " ' ■ ■'-  '••"  • 

PDT=0.0 
GO  TO  7001 


CDT=0 ,0 
GO  .TO  ^700  1 
EDTgO  ^.e 
QDIfO ,0 


aODE5880 
HOPES 890 
SQDB5900 
&OPE59  10 
CIGDE5920 
aOBS5930 
H&OE5940 
MODES 950 
SOPS 5 960 
MOPE5970 
MODE5980 
MODS599G 
MODE6QC0 
MOOS6010 
KODE6020 
HODE6C30 
MODS6040 
MODE6050 
SODS6060 
MOP  EO070 

{10&26xi-.o 

HOPE609C 
HODE6100 
MODE6 110 
KODE6120 
HODE613C 
SODE6140 
WODE6150 
RODE6160 
MODE6170 
HODE6 180 
WDD16 190 
HODE6200 
MODE6210 
HODE6220 
BODE6230 
nODE624C 


!(♦♦♦*♦  « + ♦♦♦♦♦♦♦♦♦♦♦♦♦*«**  + ♦♦  MOD  E 6 2 5 0 

'4^  ^ jy-'  ]|C 

’ MODE626C 

IN-TEGRATIC.N,  OF  .DERIVATIVES  BONE  NEXT  MODE6270 

dAXL  NTE^fT(:'^.1(^'(f)''’  ' ''  fc--  - - r HOD E6 280 

HODS629C 
HODE6300 
MODS6310 
MODE6320 


CALCULATION  , OF  STEER  AND  BRAKE  CO,M.MANDS  DONE  NEXT 
CALL  STRBRK  ‘ ' 


)i 4>>t( 4c ««* 4t  :(>«>«<« 4<  4< 

.......  ' > ;(i  V 4!  4 --  V ■ ■ ^ 

IF  (NBMP ,EQ .0)  GO . TO  84^9 
■XI  i(fy  =.X  ' ♦Af..C:^-TpC2*SN‘ 

Xlj2]^X  4^A^Z^Tt0;^*SN 
XI 1 3)  =X  ”8^7^1:02*9^ 

XI  {4)  ^X  ”B^(fz+T:lC2«N 

NUfiBR  = NUHBR  ♦ .1  ‘ 

DO  84  98  1 = 1,4 

DELX  (r)^=GETDEL(XI,I,PARAM(200)  ,N 
GETDL  ,=  ^'GE,tDL  <•  DElXfl) 

CONTI  lI'UE’'^ 
coNTnrBE 
PTB1=PTBR 
ETB2=PTBR 

X-- 


ix  «!  4:  4!  4c  *«♦♦■»♦♦*♦♦♦♦  !<s  **  ijc  ♦ c*c  >3>  H 0 D 1 6 3 3 0 

HOD  E6  340 
RODE6350 
HODE6360 
HODE6370 
HODE6380 
HODE6390 
HODS6400 
H0DE641C 

,aPJ  M0DK64  2() 

HODB6430 

HODE6440 

HODB6450 

HODE6460 

flODE6470 
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onoonoo  ono 


AKK1  = 1 .0 
AKK2=1 .0 

IF  (PARAPl  (60)  . EQ.  1. 
CALL  PTBAK  (BETA  1 ,F 
CALL.  PTEAK  (BETA2,F 
4334  CONTINUE 

IF  (SWMT.LE.O  .)  GO 
AHT1  = FX01*  (PTBI^SI 
1 +FTU  1* (-PTB1*AK 
1 -FBI* (-PTE1 * (P 
1 PHS1*SINPS1) 

Af1T2  = FXU2*  (PTB2*SI 
1 +FYU2*  (-PTB2*AK 
1 -FR2*  (-PTR2*  (P 

1 PH52*SINPS2) 

4333  CONTINUE 

AMT1  = SWMT*AMT1 
AP1T2  = SHHT*AP1T2 
CALCULATION  OF  ANT 
FOR  SOLID  AXLE  CEL 
CL3S  AND  DL4S  ARE 


0) GO  TO  4334 
R1 ,AKK1 , PTB1 ) 
F2, AKK2, PTB2) 


• y I - n ? 


TO  4333 

NPS1-ySA1*COSPSl-Z1*(PHI1*COSPS1-PHS1) ) 
K1*C0SPS1 -YSA1*SINPS 1 -Z1 * (PHI1 *SINPS 1 -THS1) ) 
RS1*C0SPS 1+THSl *SINPS1 ) +TSA1*  (THS1*C0SPS 1- 
-Z1*(PHS1*PHI1*SINPS1-THS1*PHI1*C0SPS1) ) 
NPS2-YSA2*COSPS2-Z2*  (PHI2*COSPS2-PHS2) ) 
K2*COSPS2-YSA2*SINPS2-Z2*  (PHI2*SINPS2-THS2) ) 
RS2*COSPS2+TBS2*SINPS2) +YS A2* (THS2*COSPS2- 
-Z2* (PHS2*PHI2*SINPS2-THS2*PHI2*COS  PS  2) ) 


API  = (CPOF,  + CP1F 
AP2  = (CPOF  + CP1F 
,AP3  = (CPOR  CP1R 
AP4  = (CPOR  + CP1R 
AR1  = - (CROP  + CR1 
AR2  = (CROP  ♦ CR1 
AR3  = - (CROP  + CR1 
AR4  = (CROR  + CR1 
ANTI1  = API  ♦ API 
ANTI2  = AP2  + AR2 
ANTI3  = AP3  *■  AR3 
ANTI4  = AP4  4-  AH4 


I PITCH 
3 IS  REA 
REAR  WHE 
♦CL1S  ♦ 
♦DL2S  + 
♦DL3S  + 
♦CL4S  + 
F*DL1S 
F*DL2S 
R*DL3S 
B*DL4S 

- FBS1 

- FBS2 

- FBS3 

- FBS4 


AND  BOLL  FORCES 
R AXLE  VERTICAL  ROLL  CENTER 
EL  SUSPENSION  DEFLECTIONS 
CP2F*DL  1S*DL  IS)  *FXDI(1) 
CF2F*DL2S*DL2S) 
CP2R*DL3S*DL3S) 
CP2R*DL4S*DL4S) 
CR2F*DL1S*DL1S) 
CR2F*DL2S*DL2S) 
CR2R*DL35*DL3S) 
CR2fl*DL4S*DL4S) 


♦ PXUI  (2) 

♦ (FXOI  (3) +FXU5) 

♦ (FXUI  (4) +PXD6) 

* FYUI(I) 

* FYUI{2) 

* (FYUI  (3)  4-FYU5) 
*(FYUI  (4)  +FYU6) 


SAMPLE  VALUES  TO  CALCULATE  THE  COMPARISON  VARIABLES 
CALL  CVCALC 

*************  *********************  ******************************* 


„<i^MODE6480 

V0DE649C 

HODE6500 

MODE6510 

HODE6520 

MODE6S30 

HODE6S40 

MODE6550 

MODE6560 

HODE6570 

HODE6580 

HODE6590 

HODE6600 

HODE661C 

HODE662C 

MOOE6630 

MODE6640 

MODE6650 

MODE666C 

MODE6670 

MODE6680 

MODE669C 

MODE67C0 

MODE6710 

MODE672C 

HODE6730 

MODE6740 

HODE6750 

MODE6760 

HODE677C 

MODE6780 

HODE6790 

♦♦HODE6800 

MODE6810 

HODE6620 

HODE6830 

HODE6840 

**HODE6850 


PREPARATION  OJ  VARIABLES  TO  BE  OUTPUT  ON  D/A  CONVERTERS 

TEMP  = (AMT1  + ALTC(1))  / AIEW  - RDTOOT 

TOUT  (01)=-  TEMP  *PABAM(175) 

TEHP=RZF+ZOUT-A*THEOUT+TF02*PHIOUT 

TEMP=TEMP-DELX (1) 

TOUT  (02)=TEHF 

TEMP  = (AMT2  ♦ ALTQ  (2)  ) / AIFVi  - BDTOUT 
IOOT(03)=-  TEMP  *PABAH(175) 

TEMP=RZF+ZOUT-A*THECOT-TF02*PHIOUT 
’ TEMP=TEMP-DELX(2) 
lOOT  (04)=TEMP 
IOUT(09)  =-TQFBR 
lOUT(IO) =-TQRBR 
lOUT  (1  1)  =DELSHC 

TEMP=  (RZB  + Z0UT+B*THE0UT  + PHICUT*TR02) 

TEMP=TEMP-DELX (3) 

IOOT(  1 8)  =TEHP 

TEHP=  (RZR  + ZOOT4-E*THEOOT-PHIOOT*TR0  2) 

TEMP=TEMP-DELX (4) 

IOOT(20) =TEMP 


HODE6860 

HODE6870 

MODE6880 

HODE6890 

BODE6900 

HODE6910 

MODE6920 

MODE6930 

MODE6940 

BODE6950 

MODE6960 

BODE7C40 

BODE7050 

BODE7060 

BODE7230 

BODE7240 

BODE7250 

BODE7260 

BODE7270 

BODE7280 
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C* «»«««»»««»#«««*#*«*#*# »#*##**««##« «i«»t**»« 
C*##  SPLIT  FRONT  AXLE  #### 

C*f «*««#*#***#»»**#*«*»«##««**«##«««»»# #**##« 

TH  1=TF02*PDTOOT 

TK2=A*QDTOnT 

TB3=CIP 

TEHP=-T«1 +TH2+TH3-FY0l*SPSR3-SFZS/AfiS 
lOLT (06)=TEHP  *PARAH{175) 

TEBP=  TH1+T«2+TK3+FYU2^SPSR3  -SFZS/AMS 
lOUT (08) =TEHP  *PARAM(175) 

TOUT  (05)  = 0 
IOOT(07)  = 0 


AXLE  #### 


HODE697C 

HODE6980 

BODE6990 

HODE7000 

HODE7010 

HODE7020 


c#### 

•«*«** 

«««»* 

c### 

SOLID 

REAR 

C###A 

«#»#«# 

#«#*« 

TEMP  = 

( +TRO 

lOUT  ( 

1 3)  =T 

IF  (ID 

ULTR, 

TSBP  = 

CIVP- 

lOUT  ( 

14)  = 

*PAFAB(175) 

I)  I0aT(13)  = 2.*IOUT(13) 

)TOUT-SFZS/ABS 
TEBP  *PARAB(175) 

TEMP  = (-TR02  + ZU+PHIR) * (AKT4/AIR) 

IOOT(15)=TE.BP  • *PARAfi(175) 

IF  (IDOLTR.  EQ.  1)  IOUT(15)  = 2.*IOUT(15) 

IF  (IDULTR  .NE  . 1)  GO  TO  7717 

YI13  ♦ (-Z3  ID  4-TIRO  2*PHIR)  +FYU4*  {- Z 4ID-TIR02  *PHI  8)  ) /A 
Z50D-4T0R02*PHIR)  +FYU6*  (-Z60B-TOR02*PfiIB)  -ROTB) 


(F  Y0  3 4'  (TR02  + PHIR-Z3)  4-FYU4  * (-T  R02 ♦ PHIR-Z4)  ) /AIR 
'04)*HRC  - ROTB) /AIR 


TEBP: 

=-PDTOOT- (FYU3 

♦( 

TEMP 

= TEBP“  (FY05 

♦ (- 

Z5 

1 /AIR 

GO  TO  7718 

771 

7 

TEMP: 

= -PDTOUT-  (F 

Y03 

♦( 

TEMP 

= TEMP  - ( 

(FY 

U3 

771 

8 

TOUT 

(16) =TEMP^P 

ARA 

« ( 

IF  (I 

AX  .LE.  1)  GO 

TO 

77 

C#»# 

* 

*#««#«#*»»#*#»«# 

t«# 

i# 

C### 

SPLIT 

REAP  AXLE 

##♦ 

1 

c### 

« 

»«« 

«# 

TEMP 

=G^  ( 1 .+A 

♦ AM 

3/ 

1 

-FYD3+S 

PSP 

4 

10  UT 

(14) =TSMP 

TEMP 

=G*  (1  .+A 

♦AM 

3/ 

1 

+FY04^S 

PSR 

4- 

10  OT 

(16)  =TEMP. 

lOOT 

(13)=0 

10  OT 

(15)  = 0 

lUR*  (A4-B)  ) ) -E*QDT0UT-TR0  2*PDT0UT 
'ZS/ABS 
♦PARAB ( 175) 

lUR*  (A  + B)  ) ) -E*QDTOUT4-TR02*PBTOOT 
,S/ABS 
♦PARAB (175) 


BOD 

E7 

030 

MOD 

E7 

290 

MOD 

E7 

3C0 

BODE7C70 

BOD 

E7 

cec 

BOD 

E7090 

MOD 

E7 

100 

MOD 

E7 

110 

MOD 

E7 

120 

MOD 

E7 

130 

MOD 

E7 

140 

MOD 

E7 

150 

iBOD 

E7 

160 

MOD 

E7 

170 

MOD 

S7 

18C 

MOD 

E7 

190 

HOD 

11 

20C 

MOD 

E7 

210 

MOD 

E7220 

MOD 

E7 

330 

MOD 

E7 

340 

MOD 

E7 

350 

GO  TO  7720 

7719  IF(IAX.EQ.I)  GO  TO  7720 

C*«*f #**«#«**#«««#»««««*«#«««»# I ««««««« «###*« 
C###  SOLID  FRONT  AXLE  #♦#♦ 

C*«#« »**»*##««#«»**»«««» »*#*## * 


IODT(05)  = (AKT1/AIF)  ♦ (TF024-Z1*PHIF) 

LOOT  (06)  = (A*QDTODT  ♦ CIP  -SFZS/ABS)  *PARA 
IODT(07)  = (AKT2/AIF) ♦ (“TF02+Z2*PHIF) 
lOOT  (08)  = (-PDTOOT  + ( -FYO 1* ( -Z 1 +TFO 2*P HI 
1 ♦ FOTH)/AIF)  ♦FARAH(175) 

7720  CONTINDE 

DO  3147  1=1,48 

BA CO (I) =B VALUE (DACPIA (I) ) /SCALDC(I) 

SDACO=  CACO  (I) 

DACO(I) =ABAXl{-.99  95, (A MINI  ( . 9 995  , DACO (I) ) )) 
IF(SDACO.EQ.DACC(I))  GO  TO  8317 
IDACK  = IDACK-t-1 


♦PARAB  (175) 

B (175) 

♦ PARAB  (175) 

F)  - FY02*  (-Z2-TF02*PHIF) 


MODE7370 

MODE7380 

HODE74C0 

MODE7420 

BODE744C 

BODE7450 


BODE7460 

BODE7470 

MODI748C 

BODE7490 

HODB7500 

MODE7510 

BODE7520 

BODE7530 

MODE7540 

MODE7550 

BODE7560 

HODE7570 
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IF  (IDftCK.  GT.  10)  IDACK=10 
lERDAC  (IDACK)  = I 
TERDAC (IDACK) =TTHE 
8317  CONTINOE 
3147  CONTINUE 

C DATA  COLLECTION  FOR  TRACK  OPTION 

IF  (TI  ME.  LT.  (ONTin-.OOOO  1)  ) GO  TO  8185 
IF  (TIME.GT.OFETIH)  go  to  8185 
IKEEP=IKEEP+1 

IE  (IKEEP.NE. ISAMP)  GO  TO  8185 
IKEEP=0 

DO  8199  I=1,ITRA 
J=ITRAA (I) 

JIN=JIN  + 1 

IF  (JIN. GT.  1999)  JIN  = 1999 
ATPACK  (JIN)  =BVALOE  (J) 

8199  CONTINUE 
8185  CONTINUE 
RETURN 
END 


MODE7580 

HODE7590 

HODE7600 

HODE7610 

HODE7620 

MODE7630 

MODE7640 

MODE7650 

MODE7660 

MODE7670 

MODE768C 

HODE7690 

MODE7700 

HODE7710 

MODE7720 

MODE7730 

BODE7740 

MODE775C 

MODE7760 

MODE777C 
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2.1.8 

LFRIC 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
LFRIC  SUBPROGRAM.  THE  FOLLOWING  CALCULATIONS 
ARE  PERFORMED  IN  LFRIC: 

1)  Lateral  coefficient  of  friction. 

2)  Circumferential  tire  force. 

3)  Lateral  tire  force. 

4)  Circumferential  and  lateral  components 
of  the  tire  force  on  the  wheel. 
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n? 


SDBROOTINE 

SOBRODTINE 


LFRIC 

LPRIC 


LFRI 

LFEI 


10 

20 


C**** 

c 

c 

c 

c 

c 

c 

C FUN 
C 

c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 


^ *************  ***'^**‘ ******  ************************************ 

THIS  SDBPROGRAS  PERFORMS  THE  FOLLOHING  CALCULATIONS; 

1)  LATERAL  COEFfICIENT  GE  FRICTION 

2)  CIRCnnFERFNTIAL  TIRE  FORCE 

3)  lateral’ TIRE  FORCE 

4)  CIRCOnFEHENTIAL  AND  LATERAL  COMPONENTS  OF  THE  TIRE 
FORCE  ON  THE  HHEEL 


CTION;  AMUI-HAXiHUfl  LATERAL  FRICTION  COEFFICIENT 

INPUTS:  El- (PARAH  (85) ) ,LOAD  TERM  COEFFICIENT  OF  LATERAL  FRICTION 

COEFFICIENT  (1/LB) 

B2^  (PARAS  (86) ) ,VEL0CIT?  TERM  COEFFICIENT  OF  LATERAL 
FRICTION  COEFFICIENT  (1/MPH) 

E3- (PARAH  (87) ), CONSTANT  TERM  (UNITY) 

B4- (PARAM  (38) ), QUADRATIC  LOAD  TEEM ( 1/LB**2) 

FRI-RABIAL  TIRE  FORCE  (POUNDS) 

CVT-VELOCITY  OF  VEHICLE  (MPH) 

OUTPUT:  AMUI-HAXIMUH  LATERAL  FRICTION  COEFFICIENT  (UNITY) 


COMMON/PAUL/  D1 , C2 r D 3 , D4 , S F YD, T HP , SNPHID , S NTH EU , SNPSI U , 
1QDT,PDT,  RDT  ,U DT , VDT, W DT, PHIDT , TH EDT, PSIDT , XD T , YD T ,ZD T , 

1 AKK1,AKK2,  THS1,THS2, 

1 AMT1, AMT2,SN,SFXU, ETV DT , ET AX, ET AL , 

1 ZIP  (4)  ,PHII  (4)  , 

1 Dll  (4)  ,BAMI  (4)  ,MUP(4)  ,S  AHI  (4)  ,FI  (4)  ,FXUI  (4)  ,FYUI  (4) 

1 ALFI  (4)  ,BETIP  (4)  ,BETIBR  (4) 

1 FCI  (4)  ,FCIHAX  (4)  ,FSI  (4)  , 

1 ABI  (4)  , BET  A I (4)  , AMU  I (4)  , SN  I (4)  ,RMT{4)  ,GBI(4)  ,FRIBE(4)  , 

1 EWZI  (4)  ,ZI  (4)  ,FRI  (4)  , UI  (4)  , VI  ( 4)  , HI  (4)  , UGI  (4)  , 


CLFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
LFRI 
LFR  I 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
,GI  (4)  , LFRI 
, SLTPI(4)  ,AM1I(4)  ,AM2I  (4)  ,U0l  (4)  ,LFRI 

LFRI 


LFRI 

LFRI 


VGI  (4)  ,SINPSI  (4)  ,PSII  (4  ) ,COSPSI  (4)  ,OGIP  (4)  , PHI  CGI  (4)  , CVI  (4)  LFR  I 


1 

1,ALTQ  (4) ,OTM  (4)  ,SALTQ,FOTM, BOTH 

1,AP1, AP2, AP3,AP4  ,AB1 , AR 2 , A R3 , A R4 , ANT1 1 , ANT 12 , A NT  13 , ANT  14 

1,DLIS  (4)  ,ZTMX(4)  , F ES  1 , FBS  2 , FBS  3 , F BS4 

1,PHIDMX 

COMMON/SP7BLK/N1,N2,IPOT(1'20)  ,IPOTAD(120)  ,PARAM  (400) 
COHMON/COMBLK/AIXP ,SM,AIYP, AIXZP,G AMI, GAM2 ,GAM3, AIXBR, AIYBR, 

1 AIZER, A1 , A2, AIXZBB, A12,E1 , E2, E3,DELTA,GV1 , GV2 , GPI , G P2, GRI, 

1 GR2,CIP, CIVP,R2F, RZR, A2T,CA20 , CA23,  ANGNL,ANGNLO 

1 , TRO2,TF02,TSO2,G,THRD,THN7,R2T,RA20 ,RA23 ,ONEOA,ONEOD 

1,TSF02 

COHMON/SPLTAX/  S P S R 3 , S PS R4 , lAX 

COHMO N /CAC A TO/EPS K1, EPS K2,FEE1 , FB E2 , THE1 ,T HE2 

COHMON/VARS/P,Q,R,U,V,H,X, Y,Z,THE,PHI, PSI, PO, QO , RO , UO , VO , HO ,XO , 

1 YO,ZO,THEO,PHIC,PSIO 

EQUIVALENCE 

, (PABAM  (35)  ,CA1)  , 

, (PARAM  (38)  ,CA4)  , 

, (PARAM  (86)  ,B2)  , 

(PARAM  ( 89) ,DEL1DN) 


(PARAM  (34)  ,CA0) 

(PARAM (37) ,CA3) 

(PARAM  (85)  ,B1) 

(PARAM  (88)  , B4)  , 

(PARAM(242)  ,AKCF)  , 

(PARAM  (290)  , ROT) 

(PARAM  (29  3)  ,RA2) 

EQUIVALENCE  (PARAM  (245)  ,BB1)  , (PAHAfl(246)  ,RB2) 
1,  (PARAM  (247)  ,RB3)  , (PARAM  (24 8)  ,RB4) 

EQUIVALENCE  (FEF1, FEE(1) ) , (FEE2,FEE(2) ) 


(PARAS  (36)  ,CA2)  , 

(PARAM  (39)  ,AISH)  , 

(PARAM  (87)  ,B3)  , 
(PARAM  ( 90) , DEL2DN) , 


(PARAM  (243)  , AKCR)  , (PARAM  (244)  ,AKSR) 
, (PARAM  (291)  ,RA0)  , (PARAM  (292)  ,RAl)  , 
, (PARAM  (294)  ,HA3)  , (PARAM  (29  5)  ,RA4) 


233 


LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFR  I 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFEI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 


50 

60 

70 

80 

90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

25C 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530' 


i 


CAMBER 


610 

710 


630 

730 

60 


EQUIVALENCE  (P  AR  AM  (1 8 2)  , S II  ( 1)  ) 

REAL*U  SII(4) 

BEAL*4  FEE  (2) 

DO  60  K=1,2 
KK  = K ♦ 2 

AHUI  (K)=  (B1*FRI  (K)  ♦B2*CVI(K)  ♦B3  + B4*FRI  (K)  *FRI  (K)  ) ♦SNI  (K) 

RMI(K)  = FRI(K)  ♦ AMUI(K) 

FRIBR(K)  = AMlN  (FRI  (K)  , A2T) 

ALFI  IS  THE  DENOMINATOR  FOR  THE  BETA  BAR  CALCULATION 
ALFI(K)  = CA1*FRIBE  (K)  ♦ (FRIER(K)  - CA2)  - CA20 
IF(ALFI  (K)/CA2.GE.O.)  ALFI  (K)  =-1.CE-10 

PHICGI  (K)  = IHE  + SINPSI  (K)  ♦ PHI^COSPSI  (K)  + PHII  (K) 

1 + AKCF*FSI(K) 

FOR  SOLID  FRONT  AXLE  FEE1  AND  FEE2  ARE  USED  FOR  CONSTANT 
IF(IAX.EQ.O)  PHICGI(K)  = FEE(K) 

BETIP  (K)  =.  CA23*  (C  A4 -FR  IBR  ( K)  ) ♦FRIBR(K)  * PH  ICG  I (K)  / (CA4  ♦ ALFI  (K)  ) 

IF  (RMI  (K)  .EQ.O.  ) GO  TO  610 

EETIBR(K)  = ALFI  (K)  ♦ (BETAI  (K)  + BETIP  ( K)  )/ (CA  2*RMI  (K)  ) 

GO  TO  710 
EETIBR(K)  = 0. 

CONTINUE 
AMUI(KK)  = (RE3 
1 *SNI(KK) 

PMI(KK)  = FRI{KK)  ’*  AMUI(KK) 

FRIBR’(KK)  = AMIN  (FRI  (KK)  , R2T) 

ALFI(KK)  = R A1  + FRIBR  (KK)  * (FRIBR  (KK)  - BA2) 

IF (ALFI (KK) /RA2 .GE.O. ) ALFI(KK)  = 1,0E-10 

PHICGI(KK)  = TRE  + SINPSI  (KK)  + PHI  *COSP  SI(K  K)  ♦ PHII  (KK) 

1 ♦ AKCR*FSI(KK) 

IF(IAX.LE.I)  PHICGI  (KK)  =0. 

BETIP  (KK)  =RA23*  (RA4-FRIBR  (KK))  *FRIBR(KK)  ♦PHICG I ( KK)  / ( R A4  *AL  FI  (KK) 
IF  (RMI  (KK)  . EQ.O  .)  GC  TO  630 
BFTIBR  (KK)  = AL  F I ( KK)  ♦ { BET  A I (K  K) 

GO  TO  730 
EETIBR  (KK)  = 0. 

CONTINUE 
CONTINUE 
DO  11  K=1,4 


■+  BE1*FRI(KK)  ♦ RB2*CVI(KK)  + RB4*  FRI  (K  K)  *F  RI  ( KK) 


- RA20 


♦ BETIP  (KK))  / (RA2*RMI  (KK)  ) 


ABS  (BETI3R  (K) ) 

. GE. 3. ) GC  TO  10 

BET  IBR  (K)  ♦ (1  . -THRDMABI  (K)  +TMN7*BETIBR  (K)  **2) 


10 

80 


ABI(K)  = 

IP  (ABI  (K) 

GBI(K)  = 

GO  •^0  80 

GBI(K)  = BETIBR  (K)  /ABI  (K) 
CONTINUE 


C 

C FUNCTION 
C 

C INPUTS: 

C 

C 

c 

c 

c 

c OUTPUTS: 
C 


FCSI-SIDE  FORCE  SHAPING  AS  A FUNCTION  OF  SLIP 


ANGLE  (DEGREES) 

SHAPING  FUNCTION  AS  A FUNCTION  OF 


SAMI-  SIDE-SLIP 
GAMF-SIDE  FORCE 
SLIP  (UNITY) 

AFA-BRAKING  SLIP  (UNITY) 

NFA-NUHBER  OF  DATA  POINTS 

FCSI-LINEARLY  ITERPOLATED  SIDE  FORCE  SHAPING  FUNCTION 


EAMI(K)  = BETAI  (K)  BETIP(K) 
SAMI(K)  = BABI (K) ♦57.29578 
FI  (K)  = FCSI  (S  AMI  (K)  ,SLIPI  (K)  ) 

XX  = ABS(AMUI(K)  *GBI  (K)  ) 

ASNBET  = ABS  (SIN  (BETAI  (K))  ) *SNI  (K) 
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LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
) LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
) LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
CLFRI 
LFRI 
LFRI 
LFRI 
LFRI 
LFRI 


540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
65C 
660 
670 
680 
690 
70C 
710 
720 
730 
740 
750 
760 
770 
780 
790 
80C 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090  ' 
1100  , 
1110  j 
1120i 
1130  ' 


.t 


goto  (100,100, 110,110) ,k 

LFRI1140 

100 

XXX  = (XX  - (XX-P&RAH(206)*ASMBBT)*FI(K))*SIGN(1.,GBI(K)) 

LFRI1150 

GO  TO  120 

LFRI1160 

110 

XXX  = (XX-  (XX-PABAM  (207)  *ASNBET)  ♦FI(K)  ) *SIGN  (1 . ,GBI  (K)  ) 

LFRIIITO 

120 

CONTINUE 

LFRI1 180 

PARAH(306)  TO  (309)  CIBCUM.  FRICTION  COBP. 

LFRI1 190 

FSI(K)  = FRI(K)  ♦ XXX 

LFRI1200 

GI  (K)  = - PHI  - PARAM(K  ♦ 30 5)  ♦SINPSI  (K)  ♦ XXX  ♦ COSPSI  (K) 

LFRI1210 

FYUI(K)  = FRI(K)*GI(K) 

LFRI1220 

FXUI(K)=  FRI  (K) ♦ (THE-PARAH (K+305) *COSPSI  (K)  - XXX*SINPS I (K)  ) 

LFRI1230 

FCI  (K)  =-FBI  (K)  ♦PARAB  (K+305) 

LFRI1240 

FCIHAX  (K)  =-FRI  (K)  ♦AHII  (K)  ♦STI  (K) 

LFRI1250 

11 

CONTINUE 

LFRI  1260 

RETURN 

LFRI1270 

END 

LFRI1280 
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2.1.9  CFRIC 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
CFRIC  SUBPROGRAM.  CALCULATION  OF  THE  CIRCUM- 
FERENTIAL FRICTION  COEFFICIENT  IS  PERFORMED 
IN  THIS  SUBPROGRAM. 
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JOr' 


c 


SUBPOOTINE 

SUBROUTINE 


CFRIC 

CFRIC 


CFSI 

CFBI 


10 

20 


C THIS  SUBPROGRAM  CALCULATES  THE  CIRCUMFERENTIAL  FRICTION 

C COEFFICIENT 


MUP- 

«DS- 

SII" 


SNI- 


PEAK  BRAKING  COEF.  CF  FRICTION 
SLICING  COEF.  OF  FRICTION 
SLIP  RATIO  AT  MHICH  PEAK  BRAKING 
COEF.  OF  FRICTION  OCCURS 

RATIO  OF  SIM.  VEHICLE  SKID  NUMBER  SURFACE 
TO  TIRE  DATA  SKID-  NUMBER  SURFACE 


FUNCTION: 


C ♦♦ 


AM1I“HISE  SLOPE  OF  UXI  VS.  WHEEL  SLIP 

SAMI”  SLIP  ANGLE  (DEGREES) 

SI1”  (PARAM  (182)  .UNITY) 

SI 2- (PAR  AM (183)  .UNITY) 

ST  3- (PAR  AM  (184)  . UNITY) 

SI4-  (PARAM  (185)  .UNITY) 

OUTPUT:  AM1I  ” UNITY 

COMMON/PAUL/  D1 . D 2 .03 . D4 . SF Y U . TMP . SNPH 10 .S  NTH EU .S N PSIO . 

1CDT.PDT,  RDT  .U CT . VDT. S CT . PHIDT .TH EDT. PSIDT. XDT . YDT ,ZDT . 

1 AKK1.AKK2.  THS1.THS2, 

1 AMT1, AHT2.SN.SFXU. ETVDT, ETAX.ETAL. 

1 ZIP  (4)  ,PHII  (4)  , 

1 Oil  (4)  ,BA«I  (4)  .«nP(4).SAMl  (4)  ,PI  (4)  ,FXUI  (4)  .FYUI  (4)  ,GI  (4)  . 

1 ALFI  (4)  .BET  IP  (4)  .BETIBR  (4)  .SLIP  I (4)  , AMI  I (4)  .AH  21  (4)  . UOI  (4) 

1 FCI  (4)  .FCIHAX  (4)  .FSI  (4)  . 

1 ABI  (4)  .BETAI  (4)  . AMOI  (4)  .SNI  (4)  .BMI(4)  .GBI  (4)  .FRIBR  (4)  , 

1 RWZI  (4)  , ZI  (4)  .FRI  (4)  , UI  (4)  . VI  (4)  ,WI  (4)  . UGI  (4)  . 

1 VGI  (4)  .SIN  PST  (4)  . PSII  (4)  .COSPSI  (4)  .OGIP  (4)  .PHI  CGI  (4)  .CVI  (4)  CFF  I 

1 ,ALTQ  (4)  .OTM  (4)  .SALT0.-FOTM,  BOTH 

1,  API. AP2, AP3.AP4. API ,AR2,AR3,AR4, ANTI1 . ANTI2. ANTI3. ANTI4 
1.DLIS  (4) .ZIMX{4)  .FES1.FES2. FES3.FBS4 
1 .PHIDMX 

COMMON/VARS/P.Q. R.U.V.W.X.Y.Z.THE, PHI, PSI, PO. QO . RO , UO . VO , WO , XO , 

1 YO.ZO.THEO.PHIO.PSIO 

C0MM0N/SP7BLK/N1 .N2. IPOT  (120) , IPOTAD  (120)  .PARAM  (400) 

REAL*4  MOSF.SUSR 

REAL* 4 MUS  (2)  .APF  (2)  .APR  (2)  ,IOUT  (4  8)  .MUP.SII  (4) 

EQUIVALENCE  (P  AB  AM  ( 1 82)  . S 1 1 ( 1)  ) , { P AR  AM  ( 3 24)  . 10  OT  ( 1)  ) 

EQUIVALENCE  (PARAM  (202)  .APF  (1)  ) . (PARAM  (204)  .APR  (1)  ) , 

1 (PARAM  (206)  . MUS  (1)  ) 

EQUIVALENCE  (AP?  ( 1)  . APF  1)  . (APR  (1)  . APR  1)  . 

1 (APF  (2)  ,APF2)  , (APR  (2)  ,APR2) 

EQUIVALENCE  ( BCON. P ARAM  (20 8) ) 

DO  13  K=1,2 
KK=K+2 

MUP(K)  - APF1  + APF2*FRI(K) 

MOSF  = MOS(1) *ABS  (C0S(BETAI  (K) ) ) 

AH1I{K)  = CMnP(K)/SII(K) ) *( 1.  “BCON*ABS (SAHI{K) ) ) 

MUS(1)  EQUALS  aOSF.MDS(2)  EQUALS  HUSB  ** 

IF((AM1I(K))  ♦SII(K)  .LT.MOSF)  AMlIfK)  = HUSF/SII(K) 

IF  (SLIPI  (K)  .GT.SII  (K)  ) GO  TO  71 
AM1I{K)  = AM1I(K)  * SNI  (K) 

HDACS  22.23  ARE  USED  TO  OUTPUT  FRONT  SLOPES,  6 20.21 
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FOR  REAR 


CFRI 

50 

CFRI 

60 

CFRI 

70 

CFRI 

80 

CFRI 

90 

CFE  I 

100 

CFRI 

110 

CFRI 

120 

CFRI 

130 

CCFRI 

140 

CFRI 

150  ■ 

CCFRI 

160 

CCFE  I 

170 

CCFRI 

180 

CFRI 

190 

CCFR  I 

2C0 

CFRI 

210 

CFRI 

220 

CFRI 

230 

CFRI 

240 

CFRI 

250 

CFRI 

260 

CFRI 

270 

.CFRI 

280 

CFRI 

290 

CFRI 

300 

CFRI 

310 

) CFRI 

320 

CFRI 

33  0 

CFRI 

340 

CFRI 

350 

CFRI 

360 

CFBI 

370 

CFRI 

380 

CFRI 

390 

CFRI 

400 

CFRI 

410 

CFRI 

420 

CFRI 

430 

CFBI 

440 

CFRI 

450 

CFRI 

460 

CFBI 

470 

CFRI 

480 

CFBI 

490 

CFRI 

500 

CFRI 

510 

CFRI 

520 

CFRI 

530 

CFRI 

540 

CFRI 

550  = 

CFRI 

560  I 

CFRI 

570  ; 

c 

CACS  32  TO  35  ARE  USED  TO  OUTPUT  THB  INTERCEPTS 

CFRI 

580 

IOUT(K+22)  = AH1I  (K) 

CFPI 

590 

IOUT(K+32)  = 0. 

CFRI 

600 

GO  TO  72 

CFRI 

610 

71 

CONTINUE 

CFRI 

620 

AM2I(K)  = (MUSF- (AM1I  (K)  ♦SII  (K))  ) /(I.  - SII(K)) 

CFRI 

630 

AH2I(K)  = AH2I(K)  ♦ SNI  (K) 

CFRI 

640 

IOOT(K+22)  = AH2I(K) 

CFRI 

650 

C OUTPUT:  011-VALUE  CF  UXI  AT  BRAKE  SLIP  = 1.  (UNITY) 

CFRI 

660 

U1I(K)  = MUSF  ♦.  SNI  (K) 

CFRI 

670 

C OUTPUT:  UOI-INTERCEPT  OF  UXI  AT  BRAKE  SLIP  = 0 (UNITY) 

CCFRI 

680 

UOI  (K)  = U1I  (K)  - AM2I  (K) 

CFRI 

690 

IOUT(K+32)  = UOT(K) 

CFRI 

700 

72 

CONTINUE 

CFRI 

710 

MUP(KK)  = APR1  ♦ APB2  * FRI (KK) 

CFRI 

720 

HUSR  = HUS  (2)*A£S  (CCS  (BETAI  (KK)  )) 

CFRI 

730 

AHII(KK)  = (MUP  (KK) /SII  (KK)  )*(1  . - BCON* ABS  (S  AMI  (KK)  ) ) 

CFRI 

740 

IF  ( (AM1I  (KK)  ) ♦SII  (KK)  .LT.MUSR)  AMlI(KK)  = MUSR/SII  (KK) 

CFRI 

750 

IF  (SLIPI  (KK)  .GT.SII  (KK)  ) GO  TO  76 

CFRI 

760 

AMII(KK)  = AMlI(KK)  ♦ SNI(KK) 

CFRI 

770 

lOOT  (KK+18)  = AM1I  (KK) 

CFRI 

780 

lOUT  (KK  + 32)  . = 0-. 

CFRI 

790 

GO  TO  77 

CFRI 

800 

76 

, CONTINUE 

CFRI 

810 

AM2I(KK)=  (MUSR  ~ (A  Ml  I (KK)  ♦SI  I (KK)  ) ) / (1  . -SII(KK)) 

CFRI 

820 

AM2I(KK)  = AM2I(KK)  ♦ SNI(KK) 

CFRI 

830 

IOUT(KK+18)  = AM2I(KK) 

CFRI 

840 

U1I (KK)  = MUSR  * SNI  (KK) 

CFPI 

850 

UOI(KK)  = OII(KK)  - AM2I(KK) 

CFRI 

860 

lOUT  (KK  + 32)  = UOI  (KK) 

CFR  I 

870 

77 

CONTINUE 

CFRI 

880 

13 

CONTINUE 

CFRI 

890 

RETURN 

CFRI 

9CC 

END 

CFRI 

910 
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2.1.10  DUAL 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
DUAL  TIRE  SUBPROGRAM.  CALCULATION  OF  DUAL  REAR 
TIRE  DIGITAL  MODEL  EQUATIONS  IS  PERFORMED  IN  THIS 
SUBPROGRAM. 
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SUBROUTINE 

SUBROUTINE 


DUAL 

DUAL 


DUAL 

DUAL 


THIS  SUBPROGRAM  CALCULATES  THE  DUAL  REAR  TIRE  DIGITAL  MODEL 
EQUATIONS 

4c*j((;iE:(i«:^:4[iic^4c4i«4M(e:(i:(i«4‘)^*4[*4i%#4i4:4c**4‘4>4c4c4:4‘*4<  4i  * * i(t « * 4^  s^ci^E 4i  4:  4c  <c  4t  * * 4<  4:  4c  4=  # 4^  « 

CGMM0N/D0LVAR/Z3ID,Z4ID ,Z50D,Z60D,  DUAL 

1 F3RID,F4SID,F5ROD,F6POD,  DUAL 

1 U3IB,D4ID,n50C,U60D,  DUAL 

1 V3ID  ,V4ID,V5CD»V6CD,  DUAL 

1 S3ID,»4ID,N50E,«60D,  DUAL 

1 UG3ID,UG4ID,UG50D,UG60D,  DUAL 

1 VG3ID/VG4ID, VG50D,VG60D,  DUAL 

1 DG3IDP,UG4IDP,UG50DP,UG60DP,  DUAL 

1 S3ID,S4ID,S50D,S60D,  DUAL 

1 CF3TD,CFUID,CF50D,CF60D,  DUAL 

1 ASUI3, AMUI4, AMUI5,AMUI6,  DUAL 

1 ALTQ3P, ALTQ4P,  DUAL 

1 OTH3F,OTM4F,OTM5 ,OTM6  DUAL 

COMMON/DUALS/IDULTE, NHHEEL, IIR02,T0R02,TIRT0P, VBRZRP,  DUAL 

1 FXU5,FXU6,FYU5,FY06.ALTQ5,ALTQ6,FST3,FSI4,FSIS,FSI6,  PPHIS  DUAL 

COMMON/XES/X  E (30)  , NS  (4,  30)  , DELX  (4)  ,XI  (4)  , N NN  DUAL 

COMMON/PAUL/  D 1 , D2  , D3 , D4 , S F YU ^ T HP , S NPH I U , S NTH EU , S NFS lU , DUAL 

1CDT,PDT,  RDT  ,U DT , V DT, 8 DT, PHIDT , T H EDT, PS  IDT , XDT , YDT , ZDT , DUAL 

1 AKK1,AKK2,  THS1,THS2,  DUAL 

1 AHT1 , AMT2,3N,SFXU, ETV DT , FT  AX , ET AL , DUAL 

1 ZIP  (4)  ,PHIT  (4)  , DUAL 

1 U1I  (4)  ,BAMI  (4)  ,KUP(4)  , SAMI  (4)  , F I { 4)  , FX  UI  { 4)  , F Y UI  (4)  , GI  < 4)  , DUAL 

1 ALFI(4)  , BET  IP  (4)  ,BETIBS(4)  ,SLIPI(4)  , AH  1 1 ( 4)  , AM  2 1 (4)  , UO I (4 ) ,EUAl 

1 FCI  (4)  ,FCIH  AX  (4)  ,FSI  (4)  , DUAL 

1 ABI  (4)  ,BETAI(4)  , ANDI(4)  ,SNI(4)  ,RHT(4)  ,GBI  (4)  ,FRIBR(4)  , DUAL 

1 RWZI  (4)  ,ZI  (4)  ,FRI  (4)  , UI(4)  , VI  ( 4)  , 81  (4)  , UGI  (4)  ^ DUAL 

1 VGI  (4)  ,SINPSI  (4)  , PSII  (4  ) ,COSPSI  (4)  , UGI  P (4)  ,PHICGI  (4)  ,CVI  (4)  DUAL 

1 ,ALTQ  (4)  , OTM  (4)  , S ALTQ,  FOTM,  ROTM  DUAL 

1,AP1,AP2,AP3,AP4,AE1,AR2,AR3,AB4, A NTH , ANTI2 , A NT  13 , ANT  14  DUAL 

1,DLIS  (4)  ,ZIMX(4)  ,FES1,FBS2,FES3,FBS4  DUAL 

1,PHIDMX  DUAL 

COMHON/VARS/P,Q ,R, U, V,W „X,Y  ^Z,THE , PHI , PS  I , PO, QO , RO , UO , V 0 , 80, XO,  DUAL 

1 YO,ZO,THEC, PHIC, PSIO  DUAL 

COMMON/COMBLK/AIXP  ,SH,AIYP,AIXZP,GAH1 ,GAH2,GAM3, AIXER, AIYBR,  DUAL 

1 ATZBP, A1 , A2 , AIXZBR, A12, El, E2, E3,DELTA,GV1 , G72,GP1 ,GP2,GR1 , DUAL 

1 GR2,CIP,CIVP,RZF,R2R,A2T,CA20 ,CA23 , ANGNL, AHGNLO  DUAL 

1 ,TRO2,TFO2,TSO2,G,THED,THN7,R2T,RA20,RA23,ONEOA,ONEOD  DUAL 

1,TSF02  DUAL 

COMMON/SP7BLK/N1,N2,IPOT(120) ,IP0TAD{12G)  , PAR  AH  (400)  DUAL 

REAL+4  AKTI  (4) ,IOUT  (48)  DUAL 

EQUIVALENCE  DUAL 

1 (PARAM  (31)  ,RW)  , DUAL 

1 (PARAM  (79)  ,AKTI  (3)  ) , (PARAM  (80)  ,AKTI  (4)  ) , DUAL 

1 (PARAM  (24  5)  , RBI)  , (PARAM  (246)  ,RB2)  , DUAL 

1 (PARAM  (247)  ,RB3)  , (PARAM  (248)  ,884)  , DUAL 

1 (PARAM  (252)  , ARK1)  , (PARAM  (253)  , ARK  2)  , (PARAM  (25  4)  ,ARK3)  , DUAL 

1 (PARAM  (259)  ,ORC0)  , (PARAM  (260)  ,OBC1)  , (PARAM  (26  1)  ,ORC2)  , DUAL 

1 (PARAM  (262)  ,OBC3>  , (PARAM  (303)  , PHIR)  , DUAL 

1 (PARAM  (318)  , AP.PS3)  , (PARAM  (319)  , AHPS4)  , (PARAM  (3  24)  ,IOUT  (1)  ) DUAL 

Z3ID=ZI(3)  ♦TIRTOR*  (PHI+PHIR)  DUAL 

Z4ID=ZI  (4)  -TIRTCR*  (PRK-PHIR)  DUAL 

Z50D=ZI  (3) -TIRTCR*  (PHI+PHIR)  DUAL 

Z60D=2I(4)  +TIRTOR*  (PHI+PHIR)  DUAL 


10 

20 


30 
4 0 
50 
60 
70 
8C 
90 
100 
110 
120 
130 
140 
15C 
160 
170 
180 
190 
200 
210 
220 
23C 
240 
250 
2€0 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
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V 


F3RID  = AkTI  (3)  ♦ (RS  + Z3ID  -DfLI  (3)  ) 
F4RID  = AKTI  (4)  ♦ (RH+Z4ID  -DFLX(4)3 
P5R0D  = AKTI  (3)  ♦ (Ri  + Z50D  -DELX  (3)  ) 
F6R0D  = AKTI  (4)  ♦ (RH+Z60D  -DELX  (4)  ) 
IF  (F3RID.LT.0.)  F3RID=0.0 
IF  (F4RID.LT.0.)  F4RID  = 0.0 
IF  (F5R0D.lt. 0.)  F5ROD  = 0.0 
IF  (F6ROD.lt. 0.)  F6ROD=0.0 
03ID  = UI  (3)  -TIRT0H*B 
04  ID=0I  (4)  4-TIRTDR*B 
U50D=UI (3) +TIPTOR»R 
D6OD=0I (4) -TIRT0R*R 
V3ID  = VBRZRP  + Z3ID*PPHIR 
V4ID  = VBRZRP  + Z4ID*PPHIR 
V50D  = VBRZRP  ♦ Z50D*PPHIB 
V60D  = VBRZRP  ♦ Z60D*PPHIR 
H3ID=WI(3)  *TIRT0R*PPHIR 
W4ID=WI  (4) -TIRTOR^PPHIR 
H50D  = WI  (3)  -TTRTOR^PPHIR 
W60D=MI (4) +TIRTOR*PPHIR 
UG3ID  = U3ID  ♦ IHE*«3ID 
0G4ID  = U4ID  ♦ THE^SUID 
DG50D  = U50D  ♦ THE+W50D 
UG60D  = U60D  + THE*W60D 
VG3ID  = V3ID  - FHI*W3ID 
VG4ID  = V4ID  - PHI*W4ID 
VG50D  = V50D  * PHI*W50D 
VG60D  = V60D  - PHI*tf60D 
UG3IDP  = OG3ID*COSPSI (3)  + 

UG4IDP  = 0G4ID*C0S PSI (4)  ♦ 

UG50DP  = 0G5OD*COSPSI (3)  ♦ 

UG60DP  = UG60D*C0SPSI (4)  + 

S3ID  = 1.  ♦ (ARPS3*Z3ID) /UG3IDP 
IF(S3ID.LT.  (-1.)  .OR. S3ID.GT. 1 . ) 
S4ID  = 1.  + (ARPS4 *Z4ID) /0G4IDP 
IF  (S4ID.LT.  (-1. ) .0R.S4ID.GT. 1.) 
S50D  = 1.  + (ARPS3*Z50D) /UG50DP 
IF  (350D.LT.  (-1. ) .0B.S50D.GT. 1.) 
S60D  = 1.  + (ARPS4*Z60D) /DG6CDP 
IF  (S6  0D.  LT.  (-1.  ) . 0R.S60D-.GT.  1.  ) 


VG3ID*SINPSI  (3) 
VG4ID*SINPSI (4) 
VG50D*SINPSI (3) 
VG60D*SINPST  (4) 


S3ID  = £IGN(1  . ,S3ID) 
S4ID  = SIGN  (1 . ,S4ID) 
. ,S50D) 
. ,S60D) 


S50D  = 


S60D  = 


SIGN  (1 
SIGN  (1 


CF3ID 
CF4ID 
CF50D 
CF60D 
AH  01 3 
AH0I4 
AH0I5 
AM0I6 


lOOT  (35)  + S3ID*I00T(21) 

IOOT(36)  ♦ S4ID*IOOT  (22) 

I00T(35)  * S50D  + IOOT  (21) 

I00T(36)  + S60D*I00T(22) 

(RB3  + RB1+P3RID  ♦ RB4 *F3 RID*F3 RI D) ♦ 

+ 

+ 


RB4*F4RID*F4RID) ♦ 
RB4*F5RCD*F5R0D) ♦ 
RB4*F6  H0D*F6R0D)  ♦ 


(RB3  ♦ RE1*F4RID 
(RB3  ♦ RB1+F5H0D 
(FB3  + RB1*F6R0D 
XX3  = ABS  (AM0I3*GBI  (3) ) 

XX4=ABS(AH0I4*GBI (4) ) 

XX5  = ABS  (AH0I5*GBI  (3) ) 

XX6=ABS  (AM0I6*G3I (4) ) 

ASNBT4  = ABS  (SIN  (BET  AI  (4)  ) ) *S  NI  ( 4)  ♦PAHAH  (207) 
ASNBT3=ABS  (SIN  (BETAI  (3)  ) ) ♦SNI(3)  *PARAH  (207) 
SIGNB3  = SIGN  (1.  , GBI  (3) ) 

SIGNB4  = SIGN  (1.  ,GBI  (4)  ) 

XXX3= (XX3- (XX3-ASNBT3)  *FI (3)  ) ♦SIGNB3 
XXX4= (XX4-  (XX4-ASNBT4) *FI (4) ) ♦SIGNB4 
XXX5=  (XX5-  (XX5-ASNBT3) ♦FI (3) ) *SIGNB3 
XXX6= (XX6- (XX6-ASNBT4) *FI (4) ) ♦SIGNB4 


SNI  (3) 
SNI  (4) 
SNI  (3) 
SNI  (4) 


DOAL 
DOAL 
DUAL 
DOAL 
DUAL 
DOAL 
DUAL 
DOAL 
DUAL 
DUAL 
DUAL 
DUAL 
DUAL 
DUAL 
DUAL 
DUAL 
DOAL 
DUAL 
DUAL 
DUAL 
DUAL 
DUAL 
DUAL 
DUAL 
DUAL 
COAL 
DUAL 
DUAL 
DUAL 
DUAL 
DOAL 
DUAL 
DUAL 
DOAL 
DUAL 
DUAL 
DUAL 
DUAL 
DOAL 
DOAL 
DUAL 
DOAL 
DOAL 
DUAL 
DUAL  1000 
DOAI1010 
DOAL1020 
DOAL  1030 
DOAL1040 
DUAL  1050 
DUAL1060 
DUAL1070 
D0AL1080 
DDAI1090 
DUAL1100 
D0AL1110 
DOAL1120 
DUAL1130 
DUAL1 140 
DUAL1150 


560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 
680 
69C 
700 
710 
720 
730 
740 
750 
76C 
770 
780 
790 
800 
810 
820 
8 30 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
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c 


FIUI (3)=F3PID*(-PHI-CF3ID*SINPSI(3) ♦ COSPSi 

FYUI(4)=F4RID* (-PHI-CF4ID*SINPSI(a) ♦ COSPSI 

FY05  = F5R0D*(-PHI-CF50D*SINPSI <3) ♦ COSPSI 

FYU6  = F680D* (-EHI-CF60D*SINPSI  (4)  ♦ COSPSI 

FSI3  = F3RID*XXX3 
FSI4  = F4RID*XXX4 
FSI5  = F5R0D*XXXS 
FSI6  = F6ROD+XXX6 
FXni ( 3) =F3RID*{THF-CF3ID*C0SPSI <3) - SINPSI (3) *X XK3) 

FXUI (4)=F4RID* (THE-CF4ID*COSPSI (4)  - SISPSI  (4) ♦XXXU) 

FX05  = F5ROD+ (THE-CF50D+C0SPSI  (3)  - S ISPS  I (3) *XXX5  ) 

FXU6  = F6ROD*(THE-CF60D*COSPSI  (4)  - SIHPSI  (4) *XXX6) 

PHICG3=PHICG4=PHICG5=PHICGS=0.0 
ALTQ3P=ARK1*F3RIC^FSI3*SIGN (1 . ,FSI3>*FSI3*FSI3*ARK2 
ALTQ4P=ARK1*F4RTD*  FSI4+SIGN  ( 1. , FSI4)  ♦FSI4* FSI4*ARK2 
ALTQ5=ARK1*F5R0D*FSI5*SIGN(1 .,FSI5) *FS 15 ♦FSIS ♦ ARK2 
ALTQ6=ABK1*F6R0C*FSI6>SIGN  (1 . , FSI6 ) *FSI6*FSI6 ♦ ARK2 
ALTQ{3)  = (ALTQ3P+AITQ5) 

ALTQ(4)  = (ALTQ4P4- ALTQ6) 

OT«3P=F3RID*CRC1*FSI3 
0TMUP=F4RID*0RC1 ♦FSI4 
OTM5=  F5ROD*OBC1*FSI5 
OTH6=  F6ROD*ORC1*FSI6 
OTH{3)  = (OTH3P  + OTH5) 

OTH(4)  = (OTM4P+OTH6) 

EETOPN 

END 


(3)  *XXX3) 

(4)  *XXX4) 

(3)  ♦XXXS) 

(4)  *XXX6) 


DOAl 

1 

160 

DUAL1 

170 

DOAL 

1 

IfiC 

DUAL 

1 

190 

DOAL 

1 

200 

DOAL 

1 

210 

DOAl 

1 

220 

DOAL 

1 

230 

DOAL 

1 

240 

DOAl 

1 

250 

DOAL 

1 

260 

DOAL 

1 

270 

DUAL 

1 

280 

DOAL 

1 

290 

DOAL 

1 

300 

DOAL 

1 

310 

DOAL 

1 

320 

DOAl 

1 

330 

DOAL 

1 

340 

DOAL 

1 

350 

DOAL 

1 

360 

DOAL 

1 

370 

DOAL 

1 

380 

DOAL 

1 

390 

DOAL 

1 

400 

DOAL 

1 

410 
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2.1.11  AERODY 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
AERODYNAMIC  SUBPROGRAM.  CALCULATION  OF  THE 
AERODYNAMIC  FORCES  AND  MOMENTS  IS  PERFORMED  IN 
THIS  SUBPROGRAM. 
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C SUBROUTINE  IE80EY 

SUBROUTINE  AERODf 

THIS  SDBPROGRAH  CALCULATES  THE  AERODYNAHIC  FORCES  AND  MOHENTS 
WHICH  ACT  DIRECTLY  ON  THE  SPRUNG  HASS 

Q^i^,Hf^iHfilHit*******t‘*********’*J¥************‘*^*i^  *******  4 **f¥***‘*******if**** 

C0HM0N/SP7BLK/N1,N2,  IPOT  (120),  IPOTAD  (120)  , PAP  AH  (400) 
COHHON/VARS/P,Q,R,U,V,W,X,Y,Z,THE,PHt, PSI , PO, QO , RO , DO , VO , WO , XO , 

1 YO,ZO,THEO,PHIO,PSTO 

COMHON/AERVAR/UF,VR,HR, PB AR, QB AR, R BAB, VCW , ALPH AC, TAOC , Q A ,Q ASP , 

1 CXC,CYC,CZC,CLC,CHC,CNC, DELCXC 

COHHON/AERO/SFXS,SPYS,SFZS,SNTHES ,SNPHIS,SNPSIS, APLU3  B, I AERO 
COHMON/AROTBS/  TAD  (20)  ,CX(20)  ,CY(20)  ,CZ(20)  ,CL(20)  , 

ICH (20)  ,CN  (20)  , ALPHA  (20)  ,DELCX  (20)  , NCX , NCY  , NCZ , 
1NCL,NCH,NCN,NDCX,XHP(20) ,VYHTB(20) ,NWP 
EQUIVALENCE 

1 (PARAH  (142)  ,VYH)  , (PARAH  (143)  ,OMXW)  , 

1 (PARAH  (144)  ,OMZW)  , (PARAH  (14  5)  ,RHOA)  , ( PA R AH  ( 1 4 6)  , CY  P)  , 

1 (PARAH  (147)  ,CYR)  , (PARAH  (140)  ,CZAL)  , (PARAH  (149)  ,CZQ)  , 

1 (PARAH  (150)  , CLP)  , (PARAH  (151)  ,CLR)  , (PARAH  (152)  ,CHAL)  , 

1 (PARAH  (15-3)  ,CHQ)  , (PARAH  (154)  ,CNE)  , (PARAH  (155)  ,CNR)  , 

1 (PARAH  (156)  ,SF)  , (PARAH  (157)  , VL)  , (P  AR  AM  ( 1 58 ) , RW  V) 

EQUIVALENCE  (PA  R AM  (06)  , A)  , (P  ARAM  (07)  , B)  , (PARAH  ( 71)  , HCG) 

WBL=A*B 

DCG=A-WEL/2. 

C CROSS  WIND  DISTURBANCE 
VYW=0 .0 

IF  ( (X.LT. XWP  (1)  ) .OR.  (X.GT.XWP (NWP)  ) )GO  TO  100 
VYW=XINT  (X,XWP, VYWTE,NWP) 

100  CONTINUE 

UR  = U -VYW*SIN  (PSI) 

VR  = V -VYW*COS  (PSI) 

WR  = W 

PBAR  = (P  - CHXW  + COS  (PSI)  ♦ OMZW*THE)  » APLUSB/UR 

QBAR  = (Q  ♦ OMXW  + SIN  (PSI)  ~ CMZW^PHI)  ♦ APLUSB/UR 

BEAR  = (R  - OHZW) ♦ APLUSB/UR 
VCW  = SQRT(UR*UR  ♦ VR*VR  + WR+WR) 

ALPHAC  = ATAN(WR/0R) 

TAUC=  AES  ( ARSIN  (VR/VCW)  )• 

QA  = (RHOA  ♦ VCW^VCW)/2. 

CXC  = XINT  (TAUC,TAU,CX, NCX) 

CYC  = XINT  (TAUC, TAD, CY, NCY) 

CZC  = XINT(TAUC,TAD,CZ,NCZ) 

CLC  = XINT  (TAUC, TAD, CL, NCL) 

CMC  = XINT(TAUC ,TAU,CH,NCH) 

CNC  = XINT  (TAUC, TAD, CN, NCN) 

DELCXC  = XINT(ALPHAC, ALPHA, DELCX,NDCX) 

C AERODYNAMIC  FORCES  AND  MOHENTS 
QASF  = QA*SF 

SFXS  = (CXC  ♦ DELCXC)  * QASF 
SFXS=-SFXS 

SPYS  = (CYC  ♦ CYP+PBAR  ♦ CYE*RBAR)  * QASF 
SFZS  = (CZC  + C2AL*ALPHAC  ♦ CZQ*QBAR)  ♦ QASF 
SFZS=-SFZS 

SNPHIS=  (VL*CLC4HCG*CYC)  ♦QASF 
SNTHES=(VL*CMC  + DCG*CZC+HCG*CXC)  ♦QASF 
SNPSIS= (VL^CNC+DCG^CYC)  ♦QASF 
RETURN 


DDA11420 

DOAL1430 


DUAL  1460 
DUA11470 
DUAL1480 
DUAL  1490 
DUAL1500 
DUAL  1510 
DDAI1520 
DUAL1530 
DUAI1540 
DUAL1550 
DUAL1560 
DUAL1570 
DUAL1580 
DDAL159C 
DOAL1600 
DUAL1610 
DUAL1620 
BUAL163C 
DUAL1640 
DUAL165C 
DUAL1660 
DUAL  167C 
DUAL1680 
DUAL169C 
DUAL  170C 
DUAL171C 
DUAL1720 
DnAI1730 
DUAL174C 
DUAL  1750 
DOA 11760 
DOAL1770 
DUAI1780 
DUAL  1790 
DUAL  1800 
DUAL1R10 
DUAL1820 
DUAI1830 
DUAL  1840 
DUAL1850 
DDAL1860 
DDAI1870 
DUAL  1880 
DUAI109O 
DOA11900 
DUAL  1910 
DUAU920 
DUAL  1930 
DDfil1940 
DUAL1950 
DUAL  1960 
DUAL  1970 
DUAL1980 
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2.1.12  NTEGRT 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
INTEGRATION  SUBPROGRAM.  INTEGRATION  OF  THE 
KINEMATIC  VARIABLES  IS  PERFORMED  IN  THIS 
SUBPROGRAM. 
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C SUBROUTINE  NIEGRT  ' NTEG 

SUBROUTINE  NTEGBT(*)  STEG 

THIS  SUBROUTINE  PERFORMS  THE  INTEGRATION  OP  THE  KINEMATIC  VARIA8LENTEG 

COMMON/SWITCH/  IS»  NTEG 

COh EON /OUT VAR/  POUT, QOUT, ROOT, UOUT,VOUT, WOUT, XOUT , YOUT , ZOUT , NTSG 

1PDTODT,QDTODI,RDTOI]T,TH.EOUT  ,PH lOUT  , PSI OUT , U DT OUT  , V CTOUT , M DTOOT  NTEG 

COHMON/FAUL/  D1 , C2 , D3, D4, S FYU, TMP , SNPH lU, S NTH EU, SN PSI U , NTEG 

1QDT,PDT,  RDT  , UDT , VDT, ¥DT , PHIDT ,TH EDT , PSIDT , X DT , YDT,Z DT , NTEG 

1 AKK1,AKK2,  THS1,THS2,  NTEG 

1AMT1, AMT2, SN,SFXD, BTVDT,ETAX,ETAL,  NTEG 

1 ZIP  (4)  ,PHII  (4)  , NTEG 

1 U1I  (4)  ,BAMI  {4j  ,HUP(4>  ,SAMI(4)  ,FI{4)  ,FXUI{4)  ,PYUI  (4)  ,GI  (4)  , NTEG 

1 ALFI  (4)  ,BETIP  (4)  ,BETIBR  (4)  ,SLIPI{4)  , AMI  1(4)  , AM 2 1 (4)  ,U0I(4)  , NTEG 

1 FCI  (4)  ,FCIMAX  (4)  , FSI  (4)  , NTEG 

1 ABI  (4)  ,BETAI  (4)  ,AMUI  (4)  ,SNI  (4)  , RMI  (4)  ,GBI  (4)  ,FRIBR  (4)  , NTEG 

1 R«ZT  (4)  , ZI  (4)  ,FRI  (4)  , UI  (4  ) , VI  ( 4 ) , MI  (4)  , U GI  ( 4)  , NTEG 

1 VGI  (4)  ,SINPSI  (4)  , PSII  (4)  ,COSPSI  (4)  ,UGIP  (4)  , PHI  CGI  (4)  ,CVI  (4)  NTEG 

1,  ALTQ  (4)  ,OTM  (4)  , S A ITQ  ,FOTH  , RCT  M NTEG 

1 ,AP1  , AP2, AP3 , AP4, AR1, AR2, AR3, AR4, ABTI1 , ANTI2, A NTI3 , ANTI4  NTEG 

1 ,DLIS  (4)  ,ZIMX  (4)  ,FES1,FBS2,FBS3,FBS4  NTEG 

),PHIDMX  NTEG 

COMMON/EFFS/ ANOM , ADEN, ANUMCT,ADENDT,ANUMO, ADENO, ANUHDO, ADEN  DO,  NTEG 
1 ANOUT,ADOUT  NTEG 

COMMON/VARS/P,Q,R,U,V,W,X,Y,Z,THE,PHI, PS  I , PO, QO , RO, UO , V 0, W 0 , XO,  NTEG 
1 YO,ZO,THEO, PHTC, PSIO  NTEG 

COMMON /TIMBLK/JJTI ME, TI ME, DT  NTEG 

C0MM0N/SP7BLK/N1 ,N2, IPOT { 120)  , IPOTAD(120)  ,PARAM  (400)  NTEG 

GO  TO  (1100,1200,3000),  ISH  NTEG 

1100  CONTINUE  NTEG 

IF  (PARAM  (ISO) . EC. 1 ) NTEG 

1 GO  TO  99100  NTEG 

D = U04-UDT  + DT’  NTEG 

V=VO+VDT*DT  NTEG 

H=MO+ MCT*DT  NTEG 

F=PO*PDT*DT  NTEG 

Q=QO  + QDT*DT  NTECy 

R=RO+RDT*DT  NTEG 

X=XO+XDT*DT  , NTEG 

¥=Y04-YCT*DT  NTEG 

Z=Z0+ZDT^DT  NTEG 

PHI=PHIC+PHIDT*DT  NTEG 

THE=THEO+IHEDT*DT  NTEG 

PSI=P3IO+PSIDT*DT  NTEG 

ANUM= ANUMO+ANUMET^DT  NTEG 

ADEN=ADENO+ADENDT*DT  NTEG 

99100  CONTINUE  NTEG 

UDTO=ODT  NTEG 

VDTO=VDT  NTEG 

SDTO=HCT  NTEG 

PDTO=PDT  NTEG 

QDTO^QDT  NTEG 

8DTO=RDT  NTEG 

PHIDTO=PHIDT  NTEG 

THEDTO=THEDT  NTEG 

PSIDTO=PSIDT  NTEG 

XDTO=XDT  NTEG 

YDTO=YDT  oK-a  NTEG 


10 

20 

30 


4C 

50 

60 

70 

80 

9C 

100 

110 

120 

130 

140 

150 

160 

170 

ISO 

190 

200 

21C 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 


V 


1200 


3000 

99120 


ZDTO=ZDT 

NTEG 

580 

ANO(1DO  = ANOMDT 

NTEG 

590 

ADENDO=ADENDT 

NTEG 

60C 

IF  (PARAP1(180)  .EQ.  1 .) 

NTEG 

61C 

IGO'  TO  1200 

NTEG 

620 

TSH  = 2 

NTEG 

630 

RETURN  1 

NTEG 

640 

TLT=0 .5^DT 

NTEG 

650 

V=VO+TLT^  (VCT+VDTO) 

NTEG 

660 

«=WO+TLT* ( MDT+WOTO) 

NTEG 

670 

P=PO+TLT*  (PCT  + PDTO) 

NTEG 

680 

Q=QO  + TLT*  (QDT+QDTO) 

NTEG 

690 

R=RO+TLT* (RCT+RDTO) 

NTEG 

7CC 

X=XO  + TLT+  (XDT  + XDTO) 

NTEG 

710 

Y=YO+TLT* ( YDT+YDTO) 

NTEG 

720 

Z=ZO+TLT* (ZCT+ZCTO) 

NTEG 

730 

PHI=PHIO+TLT* (PHIDT+PHIDTO) 

NTEG 

74C 

THE=THEO+TLT^ (THEDT+THEDTO) 

NTEG 

75  0 

PSI=PSIO  + TLT*  (PSTDT  + PSIDTO) 

NTEG 

760 

D=UO+TLT* (UDT+ODTO) 

NTEG 

770 

ANOM=  ANDMO+TLT*  ( A NU H DT+ A NU M CO) 

NTEG 

780 

ADEN=ADENp+TLT* ( ADENDT+ ADENCO) 

NTEG 

790 

FHIOnT=PHI 

THSOUT=THE 

EOIJT=  P 

QOUT=Q 

FOUT=H 

UOUT=U 

VOUT= V 

WOUT=  W 

XODT=X 

YOUT=Y 

ZOUT=  Z 

PDTOUT  = 0.  5*  (PDT+-PD10) 
00X001=0.^*  (CDT+QDTO) 
RDTOUT=0. 5* (RDT+RDTO) 
FSIOnT=PSI 

UDTOUT=0. 5* (UDT+DDTO) 

VDTOUT=.5*  (VCT  + VDTO) 

WDTOaT=0. 5* ( WDT*«D10) 

ANOUT=ANHM  . 

ADOUT=ADEN 

EO=P 

QO=Q 

BO=B 

UO  = U 

VO  = V 

wo=w 

xo=x 

YO=Y 
ZO  =Z 

PHIO=PHI 
THEO=THE 
PSIO=PSI 
ANUHO= AHUM 
ADENO=ADEN 


CONTINUE 

CONTINUE 

NTEG1460 

RETURN 

NTEG1470 

END 

25^  NTEG1480 

NTEG1000 
NTEG1010 
NTEG  1020 
NTEG1030 
HTEGiCaO 
NTEG1050 
NTEG1060 
NTEG1070 
NTEG1080 
HTEG  1090 
NTEG1100 
NTEG  1 1 10 
NTEG  11 20 
NTEG1130 
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2.1.13  STRBRK 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
STEER  AND  BRAKE  SUBPROGRAM.  CALCULATION  OF  THE 
STEERING  AND  BRAKING  COMMANDS  IS  PERFORMED  IN 
THIS  SUBPROGRAM. 
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C SDBROOTINE  SIRBRK 

SUBROUTINE  STRBBK 

^ 41 4Mtt  4c « iK  # * 4t  4:  « ♦ 4c  4>  4c  # 4: 4t  4 >(>  4<  lit  « 4> » 4>  « # « s*  4t  4>  4t  4< « iji  ^ * 4<  >t<  >1:  * # 

C STEERING  AND  BRAKING  COMMANDS  CALCULATED 

(^4(4;  4:41 4t4t*  *4t4s  4t  4>4t4«4!*4t*4t4c4t  *41  4i4t4‘4<4t*4t4:4t4>4‘4t4t4t4t4'4i4t4t4c4i4t4t*4i*4‘4t4‘4*4‘4**4t4i4t4t**4t4t4e4i4e** 

COMMON/PAUL/  D1 , D 2 , D 3, D4, S FYU, TMP , SNPHIU, SNTHEU ,SNPSI U , 

IQDT/PDT,  RDT  , UDT , ¥DT, WDT , PHIDT,THEDT, PSIDT, XDT ^ YDT ,ZDT , 

1 AKK1,AKK2,  THS1,THS2, 

1 AMT1 , AKT2,SN^SFXU^  BTVDT, ETAX,ETAL, 

1 ZIP  (4)  ,PHII  <4)  , 

1 Oil  (4)  , BAM  I (4)  # MU  P (4)  ,3  AMI  (4)  , FI  (4|  ,FXDI  (4)  ,FYUI  (4) 

1 ALFI  (4)  , BETIP  (4)  , BETIBR  (4)  , SLIPI  (4)  ,AH1I  (4)  ,AR2I  (4) 

1 FCI  (4)  ^FCIMAX  (4)  ,FSI  i[4)  , 

1 ABI  (4)  , BET  A I (4)  , AMUI  (4)  ,SNI  (4)  ,EMI  (4)  ,GBI  (4)  ,FHIBR  (4)  , 

1 EWZI  (4)  ,ZI  (4)  ,FEI  (4)  , UI  (4)  , VI  ( 4)  , W I ( 4)  , OGI  (4 ) , 

1 VGI  (4)  ,S  INPSI  (4)  , PSII  (4)  ,COSPSI  {4)  ,UGIP  (4  ) , PHI  CGI  (4)  , CVI  {4) 

1,ALTQ  (4)  ,OTM  (4)  , S A LTQ^  FOTM , EOT H 

1,AP1,AP2,AP3,AP4»AE1 , AR2 » A R3  ,A R4 , A NT1 1 , A NT 12, A NT 13, ANT  14 

1,DtIS  (4)  ,ZIMX(4)  ,FES1,FES2, EES3,FBS4 

1,PHIDHX 

COMMON/OUTVAR/  POUT, QOOT, BOUT, OOUT,¥OUT, WOUT,  XOOT , YOOT , ZOUT , 
1PDTOUT,QDTOUT,RDTODT,THEOUT  ,PHIOUT ,PSIOOT, UDTOUT, V CTOOT, HDTOUT 
COMBON/THINGS/TMAXl,TMAX2,TMAX3,TQfiMAX,TQFHAX, PSIMAX,ONER 
COMMON /DEL S/DELSWC 
COMMON/UVW/VC,UlN 

COMMON/ZILCH/TQMAXF,TQMAXE, AKTQF, AKTQR ,TQDRF, TQDRR,IDESW 
COMHON/TIHBLK/JJTIHE,TIME,DT 

COMMON/SP7 ELK/N1 , N2, IPOT (120) ,IPOTAD(120)  ,PARAH  (400) 

COMMON /NEHER/TIMS25,TIME10,PSI 5 ,PHIHAX,DS W MAX 
DATA  RAD/0. 1745329E- 1/ 

EQUIVALENCE  (PARAM  (118)  ,CS)  , (PARAM  (123)  ,0SW) , (PARAH(121)  ,PFL)  , 

1 (PARAM  (117)  ,CG AM)  , (PA RAM  (5S)  ,PTER)  , (PARAM  (62)  , ARFBE)  , 

1 (PAB AM  (122)  ,TTD)  , (PAR  AM  (124)  ,TSW)  , (PARAM  (115)  ,TST)  , 


EQUIVALENCE 
EQUIV  ALENCE 


(PARAM  (233)  , ALAMBD) 
(DSHCH,  PARAM  (114)) 


(PARAM  (119)  ,TQRER) 

(TQFBP, PARAM  (120)) 

(PARAM  (108)  , FREQ) 

DSLM  = PARAM  (114)  /PARAM  (116) 

XTHP=  PARAM  (121)  /PARAM  (192) 

IF(PAEAM(126) ,NE.OoO)GO  TO  4321 
IF  (TI HE.GT.TST)  GO  TO  6000 
DELSHC=0.0 
GO  TO  7000 

6C0C  DELSWC= (TIME-TST)  *CSLM 

IF  (ABS  (DELSMC)  . GT.  CSHCM)  DEL S WC  = DS  HCM* S IGN  { 1 . 0 , DELSHC) 

IF  (PARAM  (128)  .EQ. 3.0) GO  TO  7000 

IF(  TIME. GT. 4.5  ) DELS WC=D S KCM*  (5. 5 -TI ME) IGN ( 1 . 0 , CELS W C) 
7C00  DELSHC=DELS«C*RAC 
PF=0.0 

IF(TIME.LT.TTD) GO  TO  4444 
PF=  (TIME-CGAM)  «XTME 
IF(PARAM (12R)  .EQ.  1 .0)GO  TO  2223 
IF  (PARAM (128) . EQ, 3.0) GO  TO  2223 
2222  IF  (PF.GT.PFL) PF  = PPL 

IF(TIHE.LT.CGAM) PF=0.0 
PFR=  (TIME-CS) *XTMP 

IF  ( TIME.GT.es  ) PF=PF*  (CS“TIHE) /1 0 . 

IF  (TIME.LT.CS) PFR=0.0 
IF  (PFR .GT.PFL) PFR=PFL 
IF(  TIME.GT.es  ) PFS=PFR ♦ (CS-TI ME) / 10 . 
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B 
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380 
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E 

390 
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B 

400 
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B 

410 
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B 

420 
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E 
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440 
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FUNCTION:  FF-FBONT  WHEEL  BRAKE  TOBQOE  AS  A FUNCTION  OF  FRONT 

EEAKF  LINE  PRESSURE 

INPUTS:  PFR-FRONT  WHEEL  BRAKE  LINE  PRESSURE  (PSI) 

PBF-EFAKE  LINE  PRESSURE  (PSI) , ABSISSA  USED  IN  LINEAR 
INTERPOLATION  SUBROUTINE 

TQBF-FRONT  WHEEL  BRAKE  TORQUE  (I NCH - POO NDS ) , OR DINAT E 
IN  LINEAR  INTERPOLATION  SUBROUTINE 

OUTPUTS:  FF-INTERPOLATED  FRONT  WHEEL  BRAKE  TORQUE  AS  A FUNCTION 

OF  FRONT  BRAKE  LINE  PRESSURE 

TQFBR  =-FF  (PF) 

FUNCTION:  FR-BEAR  WHEEL  BRAKE  TORQUE  AS  A FUNCITON  OF  REAR  BRAKE 

LINE  PRESSURE 

INPUTS:  PFR-BRAKE  LINE  PRESSURE  (PSI ) 

PBR-ERAKE  LINE  PRESSURE  (PSI) , ABSISSA 

TQBR-REAR  WHEEL  BRAKE  TORQUE  (I NCH-POU NCS) , ORDIN ATE 

OUTPUT:  FR-INTERPCLATED  REAR  WHEEL  BRAKE  TORQUE  AS  A FUNCTION 

OF  REAR  ERAKE  LINE  PRESSURE 


TQRBR  = -FR(PFR) 

GO  TO  2345, 

2223  PF=(TIME“CGAM) *XTHP 
If  (PF. GT. PPL) PF=PFL 
PFR=  (TIMF-CGAM)  ♦XTHP 
IF  (PFR .GT.PFL) PFR  = PFL 
TQFBR  =-FF  (PF) 

TQRBR  = -FR  (PFR) 

IF  (TI  ME.  LE.  CGAM)  TQFER=0  . 

IF  (TIME.LE.CGAM)TQEBP=0. 

GO  TO  2345 

DRIVE  TORQUE  CALCULATIONS 
IDRSW=0,  REAR  WHEEL  DRIVE 
=1,  FOUR  WHEEL  DRIVE 
4444  TQFBR=  0.0 
TQRBR  = 0..0 

IF  (IDPSW.  NE.  1)  GO  TO  5555 
TQDRF  = AKTQF*  (VC-UOUT) 

IF  (TQDBF. GE. TQMAXF)  TQDRF=TQHAXF 
TQFBR  = 0. 5*  (1. -ALAMBD)  *ARFER*TQDRF 
5555  TQDRR=AKTQR*  (VC-UODT) 

IP  (TQDRR. GE. TQMAXR)  TQDRR  = TCMAXR 
TQRBR  = 0. 5*ALAMBD*TQDRR 
GO  TO  2345 
4321  CONTINUE 

DELSBC=SIN (6 .28*FREQ*TIHE) ♦CSi*RAD 
IP  (TI ME. GT. 1./FB EQ) DELSWC=0.0 
IF  ( (TIME. GT. 0.5/FREQ)  .AND. (PARAM(129) 

PF=0.0 

TQRBR=0.0 

IQFBR=0.0 

IF  (PABAH  (125) . EQ.0,0) GO  TO  2345 

IF  (TIME.LE.PARAH  (278)  .OR.TIME.GT. PARAH (279) ) GO  TO  2345 
PF= (TIME-PAR AM ( 278 ) ) *26000.0 
IF  (PF.  GT.  PFL)  PF=PFL 


GT.5.) ) CELSWC  = 0.0 


CSTRB  580 
CSTRB  590 
CSTRB  600 
CSTRB  610 
CSTRB  620 
CSTRB  630 
CSTRB  640 
USED  CSTRB  650 
CSTRB  660 
CSTRB  670 
CSTRB  680 
CSTRB  690 
CSTRB  700 
STRB  710 
CSTRB  720 
CSTRB  730 
CSTRB  740 
CSTRB  750 
CSTRB  760 
CSTRB  770 
CSTRB  780 
CSTRB  790 
CSTRB  800 
CSTRB  810 
CSTRB  820 
STRB  830 
STRB  840 
STRB  850 
STRB  860 
STRB  870 
STRB  880 
STRB  890 
STRB  900 
STRB  910 
STRB  920 
STRB  930 
STRB  940 
STRB  950 
STRB  960 
STRB  970 
STRB  980 
STRB  990 
STRB1000 
STRB101C 
STRB1020 
STE  B1030 
STRB1040 
STRB1C50 
STRB1060 
STRB1070 
STRB1080 
STRB1090 
STRE1 100 
STRB1110 
STRB1120 
STRE1130 
STRB1140 
STRB1150 
STBB1160 
STRB1 170 
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TQFBR  =-FF  (PF)  STPB1180 

TQRBR  = -FB(PF) 

2345  CONTINOE  STRB1200 

IF  (PARAH  (193)  .NE.O  .0)  DELSiC=0.  0 17  4 5 329  ♦ ( PA  RAH  (194)  ♦YOUT  + PABAH  (195)  STRB1210 
1 *YDT)  . STRE1220 

TEMPE=AES  (DEISWC/RAD)  STRE1230 

IF (TEMPE.GT.DSHHAX) DSWMAX=TEHPE  STP  B1240 

TEMPE=ABS  (TQBER)  STPB1250 

IF  (TEHPE.GT.’rQBMAX)T,QRMAX  = TEHPE  STRE1260 

TEMPE=AE5 (TQFBR)  STRB127C 

IF  (TEHPE. GT. TQPHAX) TQFHAX=TEHPE  STRB1280 

RETURN  STRB129C 

END  STRE13C0 


/ 

/ 

/ 

/ 


/ 
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THE  JOHNS  HOPKINS  UNIVERSITY 

APPLIED  PHYSICS  LABORATORY 

LAOBEL.  Maryland 


2.1.14  CVCALC 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
COMPARISON  VARIABLE  SUBPROGRAM.  THIS  SUB- 
PROGRAM COLLECTS  DATA  FOR  COMPARISON  VARIABLE 
CALCULATION. 
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non  no 


,GI(4)  , 
,U0I  (4) 


C SUBROUTINE  CVCALC 

SUBROUTINE  CVCALC 

C THIS  SUBROUTINE  COLLECTS  DATA  FOR  COMPARISON  VARIABLE  CALCULATION 

COMMON/OUTVAR/  POUT, QOUT, ROUT, UOOT , VOU T , WO UT, XOUT , YOUT , ZOUT , 
1PBTOUT,QDTOUi,RDTOUT,THEOUT  ,PHIOUT,PSTOUT,DCTOUT,VLTOUT, WDTOUT 
CONMON/EXTRA/  PS  1 3 S , PS T 4S , BT V, A YST I 
COMHON/NEWER/TIHS25,TIME1 0 , PSI 5 , PHI MAX , DS W M AX 
COMMON/SP7 EIK/N1 , N2, IPOT  (120), IPOTAD{120) ,PARAM  (400) 
COHMON/TIMBLK/JJTI  £9E,TIME,  DT 

COMMON/VARS/P,Q,R, 0, V,W,X,y,Z,THE,PHI, PS  I , PO, QO, RC , UO , VO, WO , XO , 

1 YO,ZO,THEO,  FHI.C,  PSIO 

COMMON /COM  VAR/  A XA VE ,CU VR AT , BETDM X ,CURTBP , TIM DEC , JU MP , DELSTR, DEL, 
1 AXI,CURVAV, AEBTV,A¥MAX,RMAX,DELBET,D£LPSI,BETAMX, 

1 TIHEHP,GETDL,TIHIN5 , TSTEP  , IVHTP 

COMMON/UVW/VC,U IN 

COMMON /PAUL/  D1  ,D2  ,D.3  , D4  , SF  YO,  TMP  , SNPH  lU  , S NTH  EU  ,S  N PSIU  , 

1CDT,PDT,  RD"!'  ,UET,VDT,WDT,PHIDT,THEDT,PSIDT,XDT,YDT,ZDT, 

1 AKK1,AKK2,  THSl,THS2, 

1 AMTI, AMT2, SN,SFXU, ET VDT , ET A X , ET AL , 

1 ZIP  (4)  ,PHIT  (4)  , 

,1  nil  (4)  ,BAMI  (4)  ,M0P  (4)  ,SAMI  (4)  ,FI  (4)  ,FXUI  (4)  ,FYIII  (4) 

1 ALFI  (4)  , BETIP  (4)  , BETIBR  (4)  , SLIPI  (4)  , Atni  (4)  ,AM2I  (4) 

1 FCI  (4)  ,FCIMAX  (4)  ,FSI  (4)  , 

1 AEI  (4)  ,BETAI  (4)  , AMUI  (4)  ,SNI  (4)  , RHI  (4)  ,GBI  (4)  ,FRTBR(4)  , 

1 RWZI  (4)  ,ZI  (4)  ,FRI(4)  , III  (4)  , VI  (4)  , WI  (4)  , UGI  (4)  , 

1 VGI  (4)  ,SINPSI  (4)  ,PSII  (4)  ,COSPSI  (4)  ,UGIP  (4)  , PHI  CGI  (4)  ,CVI  (4 

1,ALTQ  (4)  ,OTM  (4)  ,3ALTQ,FOT«,BOTM 

1 ,AP1 , AP2, AP3, AP4, AE1, AR2, AR3, AR4, ANT1 1 , A NTI 2, A NTI 3 , AN TI 4 

1,DLI£  (4)  ,ZIMX{4)  , F ES  1 ,F  BS2  , F BS3  ,F  B S4 

1,PHIDMX 

C0MM0N/THINGS/TMAX1,TMAX2,TMAX3 ,TQBMAX,TQFMAX, FSIHAX,  ONER 
FEAL*4  MPHIPS 
BATA  MPHIPS/17.6/ 

DATA  RAD/0. 1745329E-1/ 

EQUIVALENCE  (PAR  AH  (123)  , DS  W ) , ( P AR  A M (1 1 5)  , T ST)  , (PAR  AM  (117)  , CGAM) 
EQUIVALENCE  (P A R AM  ( 1 08)  , F R EQ) 

C LONGITUDINAL  AND  LATERAL  ACCELERATION  CALCULATION 

ETAX= (UDTOUT-VOUT*HOUT^  HOUT^QOOT) /386. 4 
ETAL=  (VDTCUT  + FOUT*UOUT“WOUT*POUT)  /386. 4 
BTV  = ATAN  (VOO.I/OOUT) 

BTVDT=  (UO(JT*VDTOUT“VOUT*ODTCOT)  / (UOUT^UOUT) 

ONER=  (ROUT  + BTVDT)  /SQBT  (OOOT  ++2  4’V0UT^^2) 

C COMPARISON  VARIABLE  DATA  COLLECTION 

IF  (IVHTP.  GT.  2)  GO  TO  40  2 
COMPARISON  VARIABLES  FOR  VHTP  # 1 
AX  AYE  = AVERAGE  LONGITUDINAL  DECELERATION 
IF  (U.GT.  (UIN-88.) ) GO  TO  400 
AXI  = AXI  * ETAX 
GO  TO  401 

400  TIMIN5  = TIME 

401  CONTINUE 
TIHDEC  = TIME  - TIHIN5 

402  CONTINUE 

IF(IVHTP.NE. 2}  GO  TO  412 
VHTP  #2  COMPARISON  VARIABLES 
AVERAGE  PATH  CURVATURE  RATIO  , CUVBAT 
AVERAGE  LONGITUDINAL  DECELERATION,  AXAVE 
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MAI  N 
MAIN 


10 

20 


MAIN  30 


MAIN 
MAIN 
MAI  N 
MAIN 
MAIN 
MAI  N 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAI  N 
MAIN 
MAIN 
MAIN 
MAIN 
MAI  N 
MAIN 
MAIN 
MAI  N 
MAIN 
MAIN 
MAI  N 
MAIN 
MAI  N 
MAIN 
MAIN 
MAIN 
MAI  N 
MAIN 
MAIN 
MAI  N 
MAIN 
MAI  N 
MAIN 
MAIN 
MAIN 
MAIN 
MAI  N 
MAIN 
MAI  N 
MAIN 
MAIN 
MAI  N 
MAIN 
MAI  N 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 
MAIN 


40 
50 
60 
70 
an 
90 
1C0 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
2 1C 
220 
230 
240 
250 
260 
27C 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 


PEAK  Body  sideslip  rate,  betdmx 

MAI  N 

590 

IF  (TIME.LT.CGAM)  go  to  410 

MAIN 

6C0 

IF(  TIME.GT.  (CGAH  ♦ 1.))  GO  TO  411 

MAIN 

610 

CURVAV  = CURVAV  ♦ ONER 

MAIN 

620 

ARETV  = ABS(BTV) 

MAIN 

630 

ABTVDT  = ABS  (BTVDT) 

MAI  N 

640 

IF  (ABBTV. GT. BETAMX)  BETAHX  = ABBTV 

MAIN 

650 

IF  (ABTVDT. GT. BETDMX)  BETDMX  = ABTVDT 

MAI  N 

660 

GO  TO  4 1 1 

MAIN 

67C 

10 

CURTPP  = ONER 

MAI  N 

600 

11 

CONTINUE 

MAIN 

690 

4 12 

CONTINUE 

MAIN 

70G 

IF  (TVHTP.  NE.  3)  GO  TO  422 

MAI  N 

710 

VHTP  #3 

MAIN 

720 

IF  ( (GETDL.  LE.O.  ) . AND.  (JUMP.  EQ.  0)  ) GO  TO  420 

MAI  N 

7 30 

IF  (TIME.GT  . (TTMBMP  1))  GO  TO  421 

MAIN 

740 

JUMP  =1 

MAI  N 

750 

CURVAV  = CURVAV  + ONER 

MAIN 

760 

ABTVDT  = ABS  (BTVDT) 

MAI  N 

770 

ABBTV  = ABS(BTV) 

MAIN 

700 

IF  (ABTVDT. GT. BETDMX)  BETDMX  = ABTVDT 

MAIN 

790 

IF  (ABBTV. GT. BETAMX)  BETAHX  = ABBTV 

MAI  N 

000 

GO  TO  421 

MAIN 

810 

4 20, 

CURT BP  = ONER 

MAI  N 

320 

TIMBMP  = TIME 

MAIN 

030 

421 

CONTINUE 

MAI  N 

84  0 

422 

CONTINUE 

MAIN 

850 

IF  (IVHTP.  NE.  4)  GO  TO  432 

MAI  N 

860 

VHTP  #4  COMPARISON  VARIABLES 

MAIN 

87C 

IF  (TI ME. LT.TST)  GO  TO  430 

MAI  N 

880 

IF  (TIME.GT . (TST  + 2.))  GO  TC  431 

MAIN 

890 

CURVAV  = CURVAV  + CNER 

MAIN 

900 

ABTVDT  = ABS  (BTVDT) 

MAI  N 

910 

ABBTV  = ABS(BTV) 

MAIN 

920 

IF  (ABTVDT. GT. BETDMX)  BETDMX  = ABTVDT 

MAI  N 

3 30 

IF  (ABBTV. GT. BETAMX)  BETAMX  = ABBTV 

MAIN 

940 

DELBET  = BETAMX  - BETA 

MAI  N 

950 

GO  TO  431 

MAIN 

960 

30 

BETA  = BTV 

MAIN 

970 

31 

CONTINUE 

MAIN 

900 

432 

CONTINUE 

MAI  N 

990 

IF tlVHTP. NE.  5)  GO  TO  442 

MAIN1 

000 

VHTP  #5  COMPARISON  VARIABLES 

MAIN  1C10 

IF  (TIME.GT.  ( (1. /FREQ)  + 1.4))  GO  TO  450 

MAI N1020 

IF(DSW.GT.O)  GO  TO  460 

HAIN103C 

DELSTR=  DELSTR  > AES(Y  + 144.) 

MAIN  1040 

GO  TO  461 

MAI N1050 

460 

CONTINUE 

MAIN  1060 

DELSTR=DELSTR  + ABS(Y  - 144.) 

MAI N1070 

461 

CONTINUE 

MAIN  1 

080 

ABBTV  = ABS  (BTV) 

MAI  N1 

090 

IF  (ABBTV. GT. BETAMX)  BETAMX  = ABBTV 

MAIN  1 

100 

DELPSI  = PSI 
450  CONTINUE 
442  CONTINUE 

VHTP  #6  COMPARISON  VARIABLE 

IF{ABS (PHIDT)  .GT. PHIDHX)  PHIDHX  = ABS(PHIDT) 
IF  (ABS  (ETAL)  ,GT.  AYMAX)  AYMAX=  ABS(ETAL) 

TEMPE  = ABS  (RODT/RAD) 

IF  (TEMPE.GT.RMAX)  RMAX=TEMPE 


MAIN  1 110 
MAIN1120 
BAIN1 130 
MAIN1140 
MAIN  1150 
MAIN  1170 
MAI N1220 
MAIN  1230 
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TEMPE=AEs (PSIOUT) 

IF  (TEMPE. GT. PS I MAX) PSIMAX  = TEMPE 
TEMPE=ABS (PHIOOT/RAD) 

IF  (TEMPE. GT. PHIMAX) PHiaAX=TEHPE 
IF  (OOUT.GE. 10.0*MPHIPS) TIHE10=TIHE 
IF  (OOUT.GE.2  5.0  + HPHIPS) TIHE25=TIME 
IF  (TIME. LB. 5.0) PSI 5=PSI OUT/PAD 
BETORN 
END 


MAIN  12t}G 
MAIN1250 
MAIN  1260 
HAIN1270 
MAIN  1280 
MAIN  1290 
MAIN1300 
MAIN  131C 
HAIH1320 


\ 

\ 
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2.1.15  RTMON 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE  REAL- 
TIME MODE  INITIALIZATION  SUBPROGR.AM.  THE  FOLLOWING 
IS  PERFORMED  IN  RTMON; 

1)  Initialization  of  order  programs  to  perform 
real-time  input/output. 

2)  Initiation  of  simulation  runs. 

3)  Suspension  of  the  simulation's  OS  processing 
until  the  real-time  processing  is  completed. 
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SOBROUTINS 

SUBROOTINE 


RTMON 

RTMON 


RTMO 

RTHO 


10 

20 


C**** 

c 

c 

c 

c 

c 

c 


THIS  SUBPROGR&H  PERFORMS  THE  FOILOSING: 

1)  INITIALIZ ATICH  OF  ORDER  PROGRAMS  TO  PERFORM  REAL-TIME 
INPUT/OUTPlJT 

2)  INITIATION  OF  SIMULATION  RONS 

3)  SUSPENSION  OF  THE  SIMULATION’S  OS'  PROCESSING  UNTIL  THE 
REAL-TIME  PROCESSING  IS  CCMPIETED 

COMMON/OSMON/  IBEAIT,NNNN  RTMO 

COMflON/APL/  OPEN  »RTSW  ,LDTSH  ,RBSW  RTMO 

COMMON/FBELK/  A E 1 R E , ICS B, OPR B, PIL R E RTMO 


INTEGER*4 

INTEGER*4 

INTEGER+4 

INTEGER*4 

INTEGER*4 

INTEGER*4 

INTEGER*4 

INTEGER*4 

INTEGER*4 

INTEGER*2 

INTEGER*2 

INTEGER*2 

INTEGER*2 


CONSL/01/ 


TCNECB 

,PILECB 


,TIMECB 

,ADAECB 

IMODOP/04/ 


,TCAECB 

,OPECB 


FIRST/0/, LAST/47/ 

NONE/0/, AD1ECB,  IMOD IC/06/, I CECB 
HONE/-1/  , FI/00/  ,11/27/ 

TDAECB 

OSECB  ,DONECB 

SCL05/5/,RCL05/5/,S1ECB5,RLECB5 


NUHEVT/03/  ,ZSRO/00/ 


DNIT/1 9/ 
TWO/02/ 

RTSH  ,RBSH 


,LDTSH  ,OEEN  ,OPDN 
EQUIVALENCE  (ADC  1 ( 24)  , I N ( 24)  ) , (ADC 2 ( 1)  , IN  ( 25)  ) 

EXTERNAL  INIT,CART  , ENDRUN , HYBINT 


IF(  BBS 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 
CALL 


W. EQ,  1 ) 
BLJCE  ( 
DEFEP  ( 
DEFER ( 
DEFEP  ( 
CRBCRB( 
TLDARB( 
SSCLRB  ( 
RSCLRB( 
SAMORB ( 


GO  TO  200 

•J007', OSECB, NOHEVT, NONE  ) 

INIT, SAVED, ZERO, 'NONE* , 'NO*  ) 
ENDFDN, SAVE1, ZERO, ’NONE', *NO«  ) 
CART, SAVE2, ZERO, ’NONE', ’NO’  ) 

FI ,L1,ADC1 ,AD1 RB, AD1ECE,CONSL  ) 

TD ARB, TDAECB, CONSL  ) 
SCL05,SLRB05,SLECB5 , CONSL) 
RCL05,RLEB05,RLECB5,CONSI) 
IM0DIC,ICRB,ICECB, CONSL  ) 269 


RTMO 

RTMO 

RTMO 

RTMO 

RTMO 

RTHO 

RTMO 

RTMO 

RTMO 

RTMO 

RTMO 

RTMO 

RTHO 

RTHO 

RTHO 

RTHO 

RTMO 

RTMO 

RTMO 

RTMO 

RTHO 

RTHO 

RTMO 

RTHO 

RTMO 

RTHO 

RTHO 

RTMO 

RTHO 

RTMO 


40 

50 

60 


COMMON 

/RBBLK/  TCNBOF 

,TIMBOF,LDAfiB  ,TDASB  ,FILBE1 

RTMO 

70 

COHHON/PB.BIK/SLRB05,  HLRE05 

RTHO 

80 

COMMON 

/ECBBLK/PILECB 

,TCNECE,TIMECB, AD AECB, TDAECB 

RTMO 

90 

COMMON/ECEBLK/  AE1ECE 

, ICECB,OPECB 

RTMC 

100 

COMMON 

/BCBBLK/OSECB 

,DONECB,SLFCB5,RLECB5 

RTMO 

lie 

COMMON/INOUT/  IN  (32), 

DACO (48) , ISW 1 ,ISW7,IPRT 

RTMO 

120 

RTMO 

130 

BEAL* 8 

PILRB(3)  ,LDARB(23) 

,TCNBUF (8) 

RTMO 

140 

REAL*  8 

IIMBUF  (8) 

RTMO 

150 

RE AL*8 

SAVF2  (16) 

,PILPB1  (3) 

, ADIRB  (12) 

RTHO 

16C 

BEAL*a 

OPRE(6)  ,TDAPB(6) 

RTMC 

170 

REAL*3 

SAVEO ( 16) 

,SAVE1  (16) 

,ICRB(6) 

RTMO 

18C 

REAL*3 

SLRB0.5  (6)  , B1FB05  (6) 

RTMO 

190 

RTMC 

200 

REAL^4 

IN 

RTMO 

210 

REAL* 4 

ADC2  (04) 

, ADC1  (24) 

RTHO 

220 

230 

240 

250 

260 

270 

280 

290 

3C0 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

5201 


\ 


200 


205 


210 


215. 


CALI  SAnOBD(  IMODOP, OPRE,OPECB, CONSL  ) 
OPDN  =0 
RBSW  =1 
CONTINUE 

IF  (IBEALT. BQ.O  ) GO  TO  210 
IF(  OPDN.FQ.1  ) GO  TO  205 
OPDN  ' = 1 
CALL  RTOPN 

CALI  RTACT(  ZERO,*  JO, 07*  ) 

CONTINUE 

CALI  DEPPR(  UNIT,HYBINT,» J007*  ) 

LDTSW  = 0 
OSECB  = 0 

CALI  HTACT(  THO  ,*J007*  ) 

CALL  MAITRT ( OSECB  ) 

CALL  WAITBD(  200  ) 

CALI  DEFPB(  UNIT,MONE, * J007 • ) 

GO  TO  215 
CONTI NUE 

CALL  LBDAFP(  F I RST , L AST , D ACO , IE RR  ) 
CALL  TLDA 

CALL  CRBCFP{  F 1 , L 1 , ADC  1 , ICR BCE  ) 

CALL  MODEL 
CONTI NUE 
RETURN 
END 


BTMO  530 
RTHO  540 
BTMO  550 
RTHO  560 
RTHO  570 
RTHO  580 
RTHO  590 
RTHO  600 
RTHO  610 
RTHO  620 
RTHO  630 
RTHO  640 
RTHO  650 
RTHO  660 
RTHO  670 
RTHO  680 
RTHO  690 
RTHO  700 
RTHO  710 
RTHO  720 
RTHO  730 
RTHO  740 
RTHO  750 
RTHO  760 
BTMO  770 
RTHO  780 


i 


i 
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2.1.16  RTIME 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  OF  THE 

REAL-TIME  EXECUTIVE  SUBPROGRAM.  THE  FOLLOWING 

IS  PERFORMED  IN  RTIME: 

1)  Assignment  of  priority  interrupt  addresses 
to  real-time  events . 

2)  Initiation  of  the  interval  timer  for  compu- 
tation cycle  timing. 

3)  Execution  of  all  real-time  input/output. 

4)  Checks  for  end-of-run  conditions. 

5)  Deactivation  of  real-time  mode  at  the  end 
of  a simulation  run. 
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C SOBROailNE  RTIHE 

SUBROOTINE  RTIHE 


RTIM 

RTIH 


10 

20 


c 

C 

C 

C 

C 

C 

c 

c 

c 


THIS  SUBPBOGBAH  PEEFORHS  THE  FOLLOWING; 

1)  ASSIGNMENT  OF  PRIORITY  INTERRUPT  ADDRESSES  TO 
REAL-TIME  EVENTS 

2)  INITIATION  OF  THE  INTERVAL  TIMER  FOR  COMPUTATION 
TIMING 

3)  EXECUTION.  OF  ALL  REAL-TIME  INPUT/OUTPUT 
U)  CHECKS  FOR  END-OF  RUN  CONDITIONS 

S)  DEACTIVATION  OF  REAL-TIME  MODE  AT  THE  END  OF  A 
SIMULATION  RUN 


CYCLE 


COMMON/APL/  OPEN  ,RTSW  ,LDTSH  ,RBSW 

RTIM 

40 

COMMON/BBELK/  AD  1 RE, ICRE, OPRB, PILRE 

RTIH 

50 

COMMON  /RBBLK/  TCNBUF,TIMBnF,LDAHB 

,TDARB  ,PILRB1 

RTI  M 

60 

COMMON/RBBLK/SLRB05,RLRB05 

RTIM 

70 

COMMON  /ECEPLK/PILECB,TCNECE,TIMECE 

, ADAECB, TDAECB 

RTIH 

80 

COMMON/ECBBLK/  ADI ECB ,I CEC B , OP ECB 

RTIH 

90 

COMMON  /ECBELK/OSECB  , DONECE, SLECB5 

,RLECB5 

RTI  M 

100 

COMHON/INOUT/-  IN  (3  2)  ,DACO(48)  , ISW1, 

ISW7, IPRT 

RTI  K 

110 

COMMON/VARS/P,Q  ,R,  U,V,W,X,Y,Z,THE,PHI,  PSI,  PO, 

QO, RO,UO, VO,WO,XO, 

RTIM 

120 

YO,ZO, 

THEO, FHIC,PSIO 

RTI  M 

130 

COMMON/TIMBLK/JJTIME,TIME,DT 

RTIM 

140 

COMMON/SP7BLK/N1 ,N2,IPOT  (120)  , IPOTAD(120)  ,PARAM  (400) 

RTI  M 

150 

COMMON/NS HER/TIME2 5, TIME  10, ESI  5, PHIM AX , DSHH AX 

RTI  M 

160 

COMMON/NONAME/XEND  ,0,EXIT2 

RTIM 

17C 

COMHON/NODLY/INDXCN 

RTI  M 

180 

DIMENSION 

CSI  (4)  ,XEM  (4)  ,SLP  (4) 

RTIH 

190 

BE AL*8 

EUFF(8)  ,PILPB{3) 

,LDARB (23) 

,TCNBTIF  (8) 

RTI  M 

200 

REAL+a 

TIMBUF  (8) 

RTIM 

210 

REALMS  ICRB  (6)  , PILBE1  (3)  , AClRB(12) 

RTIM 

220 

REAL*8 

OPRE(6) 

,TDAEB(6) 

RTI  M 

230 

REAL*8 

BUFFI  (8) 

RTIM 

240 

REALMS  SLHB05  (6)  , BLRB05(6) 

RTIM 

250 

RTIH 

260 

REAL*4 

IN 

RTI  M 

270 

REAL+4 

ADC2(04)  , ADCl  (24) 

RTIH 

280 

RTIM 

290 

INTEGEB+4 

TIMCAN  ,TCNECB 

,TIMECB 

RTIM 

300 

INTEGEB*4 

CONSL/01/  , PILECB 

, ADAECB 

,TDAECB 

RTIM 

310 

INTEGEE*4 

EVTBET/02/ 

,TIMINT/120000/ 

RTI  M 

320 

INTEGER=»4 

SLECB5,RLECB5  , 

FIRST/00/ 

, LAST/4  7/ 

RTIM 

330 

INTEGEB+4 

OPECB, AD1ECE, ICECE 

RTIM 

340 

INTEGER+4 

TDAECB  , STATUS 

RTIM 

350 

INTEGEB*4 

OSECB  ,DONECB 

RTIH 

360 

INTEGER^4 

PILCB1 

RTIM 

370 

RTIM 

380 

INTEGSR*2 

PILIST  (2)  /1,0/,  EVTLST/V 

RTIM 

390 

INTEGER+2 

TWO  /02/  ,ONE/C1/ 

RTIM 

400 

INTEGER*2 

RTSW  ,BBSW  ,LETSH  ,OPEN 

RTIM 

410 

RTIM 

420 

EQUIVALENCE  (ADCl  (24)  ,IN  (24) ) , 

(ADC2  (1)  ,IN  (25)  ) 

RTIM 

430 

RTIM 

440 

EVENT  0 

RTIM 

450 

RTI  M 

460  1 

ENTRY  INIT 

RTIM 

470  j 

CALL  PGET(  PILIST,  0 , • JOO 7 » , PILRB 1 ) 

RTI  M 

480 

PILECB 

= 0 

273 

RTIH 

490 

non  n n o 


V 


* 


CALL  PCAN(  PILIST,BOFF,PILECB  ) 

RTIM  500 

CALL  HIOCHKf  PIIECB  ) 

RTIH  510 

CALL  PEVT(  PILIST,EVTLST,*J007 ' .PILRB  ) 

RTIM  520 

DONFCB  = 0 

RTTH  530 

. CALL  HWATT(  DONECB  ) 

RTIM  540 

CALL  PREL(  PILIST, • J007<  ,PILRB1  ) 

RTIM  550 

CALL  HDONE{  ' DN ' ) 

RTIM  560 

CALL  KEXIT 

RTIM  570 

RTIM  5fl0 

EVENT  1 

RTIH  590 
RTIM  6C0 

ENTRY  ENDRIIN 

RTIM  610 

TCNECB  = 0 

RTIM  62C 

CALL  RDTIHR(  T I «C AN, T CN £CB,  * CAN C * , TCN BO F ) 

RTIM  630 

CALL  HIOCHK(  TCNECB  ) 

RTIM  640 

PILECB  = 0 

RTIM  65C 

CALL  PDAC  ( PILIST, BUFF, PILECB  ) 

RTIM  660 

CALL  HIOCHK{  PILECB  ) 

RTIM  670 

PILECB  = 0 

RTIM  680 

CALL  PCAN(  PILIST, BOFF, PILECB  ) 

RTIH  690 

CALL  HI0CHK(  PILECB  ) 

RTIH  700 

LCECB  = P 

RTIM  71C 

CALL  HTOeEQ(  ICBE  ) 

RTIM  720 

CALL  HIOCHK  ( ICECB  ) 

RTIM  730 

CALL  RTCAN(  TWO  , STATUS  ) 

RTIM  740 

CALL  HOSPST(  'FN*  ) 

RTIM  750 

CALL  HEXIT  . 

RTIM  760 
RTIM  77C 

EVENT  2 

RTIM  780 
RTIM  790 

ENTRY  CART 

RTIM  800 

IF(  LDTSW.EQ.1  ) GC  TO  230 

RTIH  810 

PILCB1  = 0 

RTIM  8 20 

CALL  PACK  PILIST, BUFF1,PILCB1) 

RTIM  830 

CALL  HIOCHK  ( PILCB1  ) 

RTIM  040 

TINECB  = 0 

RTIM  850 

TIHINT  = 1 .E06*DT/PAPAH  (175) 

RTIM  860 

CALL  LDTIMR(  TI HI NT , T IM FCB, EVT R ET, T IM BU F ) 

RTIH  870 

OPECB  = 0 

RTIH  880 

CALL  HIOREQ(  OPRB  )' 

RTIM  890 

LDTSW  = 1 
GO  TO  250 

RTI M 900 

CONTINUE 

RTIH  910 

SLECB5=0 

RTIM  920 

TDAECB  = 0 

RTIM  930 

AD1ECB  = 0 

RTIH  940 

CALL  HIOREQ (SLRE05) 

RTIH  950 

CALL  HIOREQ(  ADiRB  ) 

RTIH  970 

J=0 

RTIM  980 

CO  200  I=1,INDXCN 

RTIM  990 

J=J+1 

RTIM1C00 

CONTINUE 

RTIM 1010 

CALL  HIOCHK  ( ADIECB  ) 

RTI H1020 

CALL  MODEL 

RTIM  1030 

ADAECB  = 0 

RTI M1040 

BLECB5=0 

RTIH  1050 

CALL  LBDART(  FI RST, L AST , DACO ,L D ARB  , A DA ECB , CONSL  ) 

RTIM1C60 

CALL  HIOREQ(  TDARB  ) 

RTIM  960 

CALL  HIOREQ(RLRB05) 

RTIM  1070 

APL  WILL  TERMINATE  REAL-TIME  SUN  IF  EITHER  274 

RTI M1080 

V 


* 


C CONDITION  SHOWN  BELOW  IS  SATISFIED 

C=SQBT (U*U*V*V) 

IF(D.LE.O. 1) CALL  HTACT (ONE, »J007») 

IF(PHIHAX.GT. 15.)  CALL  RTACT  (ONE, * J007 * ) 

IP((  ISW1.EQ.1  ).OB.(  ISH7.EQ.1  ))  CALL  RTACT  ( ONE  ,*J007* 
IF(  TIME, LE. XEND. AND. O.GE.EXIT2  ) GO  TO  250 
CALL  RTACT(  ONE,»J007*  ) 

250  CONTINUE 
CALL  HEXIT 
EETURN 
END 


RTIH1090 
RTIH  1100 
RTIH1110 
HTIH1120 
RTIH1130 
RTIMliaO 
RTIH1150 
RTIM1160 
RTIM1170 
RTI M1180 
RTIM1190 
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2.1.17  CMPVAR 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
PERFORMANCE  COMPARISON  VARIABLE  (PCV)  CALCULATION 
SUBPROGRAM.  THE  CALCULATION  AND  OUTPUT  OF  THE 
PCV'S  ARE  PERFORMED  IN  CMPVAR  FOLLOWING  EACH 
SIMULATION  RUN. 
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SUBROUTINE 

SUBROUTINE 


CMPVAR 

CflPVAR 


CHPV 

CMPV 


10 

20 


^rt,t^:^l^^^^i^^*t‘****i^**^****  ***************  *****************  ****4f  *********** 

THE  CALCULATION  AMD  OUTPUT  OF  THE  CV*S  ARE  PERFORMED  IN  THIS 
SUBPROGRAM  FOLLOWING  EACH  SIMULATICN  RON 

Q********** ************************************************************* 

COMMON/COMVAR/  A XA ?E,CDVRAT , BETDMX ,CUR TBP, TI M DEC, JUMP , DEL 
1 AXI,CORVAV,ABBTV,AYKAX,RMAX,DELBET,DELPSI, 

1 .TIHEHP,GETDL,TIMIN5,  DT,  IVHT 

C0MH0M/THINGS/THAX1,TMAX2,THAX3,TQRHAX,TQFMAX, PSIMAX, ONER 
COHMON/NEHER/TIME25,TIME10, PSI5,PHIMAX,DSHHAX 
DATA  CURV1G/. 00078/ 

DATA  LPTB/2/ 

C CALCULATION  OF  COMPARISON  VARIABLES 

IF  (TIMEEC. EQ.O. ) T IHDEC= . 00000 000 1 
IF(CnRTBP.EQ.O.  ) CDRTBP= . OCOOOOO 1 
GO  10(1,2,3,4,5,6),  IVHTP 
AXAVE  = AXI*CT/TIMCEC 
GO  TO  10 
T CONTINUE 

AXAVE  = AXI*DT/TIMDEC 
GO  TO  10 
, 2 CONTINUE 

AXAVE  = AXI*CT/TIMCEC 
CUVRAT  = CURVAV  ♦ DT/CURTBP 
GO  TO  10 

3 CONTINUE 

CUVRAT  = CURVAV  ♦ DT/CURTBP 
GO  TO  10 

4 CONTINUE 

CUVRAT  = CURVAV*. 5*DT/CURV1G 
GO  TO  10 

5 CONTINUE 

DEL=  (DELSTR*DT/3. 4)/12. 

CONTINUE 
CONTINUE 

BMAX  = BMAX/57.3 

WRITF  (LPTR,2  345)  A XA VE ,TI MDEC, CUV B AT, BETDMX, BET AM X , DELBET 
1AYMAX»PHIM AX,RMAX,DEL,DELPSI,DSWMAX,TQFMAX,TQRMAX 
FORMAP(»0  AXAV=«,F8.3, • DECL  T IME= » , F8 . 3, » AVCUR= * ,F8 . 3 , ' 

1,F8,3l*  BTMAX=* ,F8 .3, • DELBT  = * , F8 . 3/ 

1 *0AYMAX= • , F8. 3, • PHIM AX= • , F8. 3 , ' BMAX= • , F8 . 3, • LANECHNG 
1F8.3,*  DELPSI=* ,F8.3, • MAX  STEER=  • ,F8. 3/ 

1 '0FTR(&MAX=»,F9.  3,  • RTRQHAX  = » ,F9.3/) 

EETURil 
END 


6 

10 


2345 


,STR,DEL, 

CHPV 

40 

BETAMX, 

CMPV 

50 

P 

CHPV 

60 

CMPV 

70 

CHPV 

80 

CHPV 

90 

CMPV 

100 

CMPV 

110 

CMPV 

120 

CHPV 

130 

CHPV 

140 

CHPV 

150 

CMPV 

16C 

CMPV 

170 

CMPV 

180 

CMPV 

190 

CHPV 

200 

CHPV 

210 

CMPV 

220 

CHPV 

230 

CHPV 

240 

CHPV 

250 

CMPV 

260 

CMPV 

270 

CHPV 

280 

CMPV 

290 

CMPV 

300 

CMPV 

310 

CMPV 

320 

CMPV 

330 

CMPV 

340 

CHPV 

350 

CHPV 

360 

BTDMAX= 

•CMPV 

370 

CMPV 

380 

DEL=', 

CHPV 

390 

CMPV 

400 

CHPV 

410 

CMPV 

420 

CMPV 

430 
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2.1.18  QSTD 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  OF  THE 
SUBPROGRAM  WHICH  OUTPUT  NON-STANDARD  DATA. 
THE  PERFORMANCE  COMPARISON  VARIABLES  ARE 
OUTPUT  FROM  QSTD. 
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Don 


C 


SUBROOTINE  QSTD  QSTD 

SDBPOOTINE  QSTD  QSTE 

««  4<  4^  * 4> « 4< 4c «««  itc  **  4c  4>  ><>  «*«*«*«««*«♦«  4c  4c  # 4i « 4c  4c  « 


STANDARD  FND  OF  RUN  DATA  IS  OUTPUT  FROH  THIS  SUBPROGRAM 

4c « 4c  4<  4>  4>  4c  4>  4>  4c  « « 4c  4c « 4>  4i  4<  4i  4c  4c  4c  4c  4 4c  4c  4c  4i  4c  4c  4>  4c  4<  4<  4c  4>  4< « 4>  4<  4c  4: 4<  4c  4t  4c  4c  4c  4c  4c  4c  4>  4c  * 4c  ♦ 4c  4<  4>  4>  4<  4>  4c  4>  4c  4c  4c  4=  4c 


COHHON/DEVICE/KEYBD,ITTY,ICDRD ,IPTR,LPNT  QSTD 

COMMON/COM VAR/  A X A V E , CU VE AT  , BETEM X ,CORTBP , TIM  DEC, JU MP, DELSTR, DEL,  QST C 
1 AXI,CUR.VAV,  AEBTV,AYMAX,RMAX,DELBET,DELPSI,BETAMX,  QSTD 

1 TIMBMP,GETDL,TIflIN5 , TSTEP  , IVHTP  QSTD 

COMMON/THING3/TMAX1,TMAX2,TMAX3,TQRMAX,TQFMAX,PSIMAX,ONER  QSTD 

COMHON/NEHER/TIME25,TIHE1 0, FSI5 ,PHIMAX,DSWMAX  QSTE 

WRITE(ITTY,2345)  AX AV E, TIM  DEC, CUVR AT , BETDM X ,BET A MX , DE LBET,  QSTD 

1AYMAX,FHIMAX, RMAX,CEL,DELPSI,DSHMAX,TQFMAX,TQRMAX  QSTD 

2345  FORMAT{»0  AXAV= ' ,F8. 3 , ' DECl  TI ME=  ’ ,F8 . 3 , • AVCUR= ' , F8 . 3 , ’ BTDMAX=’QSTE 
1,F8.3,'  BTMAX=* ,F8 .3, ' DELBT=* , F8 . 3/  QSTD 

1*  AYMAX=* ,F8.3, • PHIHAX=  ' ,F8 . 3 , * R HAX=  • , F8 . 3,  • LANE  CHNG  DEL  = ' , QSTD 
1F8.3,'  DELPSI=» ,F8 . 3,  » MAX  STEER= • , F8 . 3/  QSTE 

1»  FTRQMAX=' , F10 .0,  • RTRQM AX= • , F 10 . 0/)  QSTD 

RETURN  QSTD 

END  QSTD 
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140 
150 
160 
17G 
180 


283 


/ 

1 


c 


V 

) 

' ■ ;.  > 
^ n f 

!'‘f 

■,y< 


■,  -.'». 


I 


«•«*  V.,! 


•rrJtri^M'y^^  *«IJtt>ii8i)a  '-’5  ■ 


■ t f i.‘/t  *M> 


h 


-3 


fj  ' '•  w 


■ > ' 

. }i‘v 

..vwip 

''  V V; 

1 > ' . ' 

«!'■•;? 

' ' ' ^ 

• 4 7'  '< 

. 5 - a -T''  ,■ 

IH^:.;  '■  V 

-i  fj  T^VT«  '<* (T ■ J 3|  ^ ■■  - ’’• 

1 


A .0  ♦ f f A’ 


7^'.  : 

•1 


■ (*  S :'‘0T  i . ''  t . m, , * **  ^|  '^  * ‘jj, 


J*' 

j; 


^ Jr’::'  .ajg^p|BPI  T^pg- 

' ma— ^fyJEttLAri/ 


^ vlv)5f’ 


' * 1 W: ; 

\ V-'  . 

,*'•'  "?;)» 


■:;  ■.  " ■ -■■'  "ij^i?-;:;.'  ^'OTT^!'  ‘ 'fH 


ji. '" 


THE  JOHNS  HOPKINS  UNIVERSITY 

APPLIED  PHYSICS  LABORATORY 

LAUREL.  Maryland 


2.1.19  ERMONT 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
ABNORMAL  SIMULATION  OPERATION  SUBPROGRAM.  THE 
CONDITIONS  OF  VEHICLE  ROLL-OVER,  DIGITAL-TO- 
ANALOG  CONVERTER  OVERRANGE,  AND  ANALOG-TO- 
DIGITAL  CONVERTER  OVERRANGE  ARE  DETECTED  BY 
ERMONT  WHEN  SINGLE  RUN  EXECUTION  IS  PERFORMED. 
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C SUBROUTINE  BRMONT  (MOPU, OBNftHE, PHI N AX)  ERHO 

SUBROUTINE  ERMONT  ( WOPU, ORN A BE, PHI M AX)  EHMO 

♦♦*♦♦♦♦*♦♦♦♦♦♦♦♦*♦♦♦♦♦♦♦♦♦♦♦  ♦**»****i|tj)c4t***  ♦♦**♦*♦♦♦♦♦♦♦♦♦♦  ♦♦♦♦♦♦♦♦ 

C THE  CONDITIONS  OF  VEHICLE  RCLL-OVER,  DIGIT AL-TO- AN ALOG  CONVERTER 

C CVEBRANGE,  AND  A N ALCG-TO -DIGIT AL  OVERRANGE  ARE  DETECTED  BY 

C THIS  SUBPROGRAM  WHEN  SINGLE  RUN  EXECUTION  IS  PERFORMED 


COHMON/EMON/IERDAC (1 0 ) , T ER D AC { 10)  ,IDACK,IENDR  (20)  ERHO 

COMMON /ERMON 2/  I EB ABC (1 0) , TERA DC ( 1 0) ,IADCK  ERMO 

COMMON/DACADC/  N A M E AC, N AM A DC , I D AC , I ADC,  A DCNUH , DACN OM  ERMC 

INTEGER*2  NAMDAC(48)  ,NAHADC(48)  ,IDAC(48)  ,IADC(48)  , ADCNUM, DACNUM  ERMO 
EEAL*8  CRNAME(4C0)  ERMO 

IF  (PHIHAX. LT. 15. ) GO  TO  200  ERMO 

WRITE (MOPU, 205)  PHIMAX  ERMO 

205  FORMAT  ('  VEHICLE  ROLL  OVER  PHI M AX  = * , F8 . 2)  ERMO 

200  CONTINUE  ERHO 

IF (IDACK. LT. 1)  GO  TO  100  ERMO 

WRITE  (MOPU, 105)  EPMG 

WRITE (MOPU, 106)  ERMO 

■ WRITE  (MOPU,  107)  (T  E E D AC  ( J)  , C RN  AME  ( N AM  D AC  (I  ER  D AC  ( J)  ) ) , ERMC 

1 IDAC  (lERDAC  (J)  ) ,J  = 1,  IDACK)  ERMO 

105  FORMAT(*  DAC  OVERLOAD')  ERHO 

106  FOBMATC  TIME  VAR')  ERMC 

107  FORMAT  (F8.2,  2X,A6,  • (' ,14,  »)  ')  ERMC 

100  CONTINUE  ERMO 

IF  (lA  DCK.  LT.  1)  GO  TO  300  ERMC 

WRITE  (MOPU,  305)  ' ERMO 

WRITE  (MOPU, 106)  ERMC 

WRITE  (MOPU, 107)  (TERADC  (J)  ,CRNAME ( NAMADC(IERADC  (J) ) ) , ERMO 

1 I ADC (lERABC  (J)  ) , J = 1 , IADCK)  ERMO 

305  FORMAT (*  ADC  OVER  RANGE*)  ERMC 

300  CONTINUE  ERMO 

FETUEN  , ERMO 

END  ' ERMO 
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2.1.20  NTRACT 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
NTRACT  SUBPROGRAM.  THIS  SUBPROGRAM  IS  FOR 
SIMULATION  CONTROL  VIA  THE  INTERACTIVE  ROUTINES 
USING  THE  OPTION  COMMAND. 
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C SUBFOUTINl?  NTRACT  *,*,*) 

SOBROUTINE  N TRACT 

****  *********************  ****^**^>tf^*At^**^*****‘***^*^  ************* 

THIS  SUBPROGRAM  IS  FOR  SIHUIATIOH  CONTROL  VIA  THE  INTERACTIVE 
ROUTINES  USING  THE  OPTION  CCMMASD 

t^i^uii:tf**,t  *********************************************************  ******* 

NTRA 

****4^***********************  COMMON  AREAS  A 

NTRA 

COMMON/START/  ZC0MMY(4) 

COMMON/T ABBS/  IT ABP, ITABI, ITNAM,TABNUM 
COMMON/EHON/IERDAC  (10)  ,TERDAC(10)  , IDACK, lENDR (20) 

COMMON/E RM0N2/  IERADC(10),TERACC(10), lADCK 
COMMON/NEWER/TIHE2  5,TIME10,  FSI  5,PHIHAX,.  DSNMAX 
COMMON/DEVlCE/KE¥BE,ITTY,ICDRD,lPTR,LPNT 
COMMON  /ECBBLK/PILECB,TCNECE,TIMECE, ADAECB^TDAECB 
COMMON /ECBBLK/  AD  1 ECB ,I CEC E , CPECB 
COMMON  /ECBELK/OS ECB  , DONECE, SLECB5»RL ECB5 
COMMON/OSMON/  IREALT,NNNN 

■ COMMON/OSTRAN/  ICT  , IRT , MOPU  R U NS , IRON S » RE ALT , IT BUNS 
COMMON/DACADC/  N A M C AC, N AM A D C , I D AC ^ I ADC, ADCNOM , DACNUM 
COHMON/IO/  DACPLA, ADCPL A , S C AlDC ,S C AIAC 
. COMMON/TRACK/JIN, IKEEP, ATBACK, IS AM P, ONT I M , OFFTIM , I TRA , 


NTRA  10 


20 

30 

40 

50 

60 

70 

80 

90 

10C 

110 

120 

130 

140 

150 

160 

170 

180 


NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTH  A 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 


1 ITRAA, 

ITRNA ,ITRIA 

NTRA 

190 

COMMON/UNREAE/NAHEA, IHR DCT, INU MCT, LSTAPT, INDE XA , 

NTHA 

200 

1 FNUMA, 

LAST, ILOP 

NTH  A 

210 

COMMCN/FIND/CENAME  (400)  ,NCOM,RSVAL  (00  2)  , lORDER  (400) 

NTRA 

220 

COMHON/TIMBLK/JJTIME,TI ME,DT 

NTRA 

230 

COMHON/SP7BLK/N1,N2,IPOT(12  0) ,IPOTAD(120)  , PA RAM (4  00) 

NTRA 

24C 

COMMON/OVRLAY/  OPT EST , V AIM R , FI NLM R , NTI M E 1 , NTI M E2 , LOCA T , LOO P N 

NTRA 

250 

NTRA 

260 

*4i4i*4c  4f4t*4i4i4i*4f4i  4^4^41  ****************************************************** 

270 

NTH  A 

280 

REAL+8 

NAMEA  (10)  , RETURN 

NTRA 

290 

REAL*8 

OPTION  (20)  ,CFT5ST  , ASELT(15)  , R EHOVE , RESET 

NTRA 

300 

REALMS 

BLANK 

NTRA 

310 

BEAL*8 

NMES, NTESTP, NTESTO 

NTRA 

320 

REALMS 

NADCL,NDACL ,NDUMP,NNFC, NPLOT,NSTD 

NTRA 

330 

EEAL*8 

NTRACK,NTM, NTIHD ,NTABLE 

NTE  A 

340 

BEAL*8 

CUTNAM(21) , NX  , NTERM,N RESR, NIC, NADCA 

NTRA 

350 

REAL*8 

NXM,UNNAM (3)  ,MODENA  (4) 

NTRA 

360 

RE  AL*8 

CRN AHE 

NTRA 

370 

REAL*8 

NSAMPL,NLA 

NTRA 

300 

RBAL*8 

NDACA,NMULT,CNAME, NII,NFF 

NTRA 

390 

REAL*8 

NUOPT,NUOTl  ,NSTAT 

NTRA 

400 

REAL*8 

BNDIAC,ENDAEC 

NTRA 

410 

REAL+4 

ZDUMMY 

NTRA 

420 

REAL*4 

VALMR  (20)  , FINLMR  (20) 

NTRA 

430 

REAL+4 

FNUMA  (10) 

NTRA 

440 

REAL*4 

SCALAC  (48)  ,SCA1DC(48) 

NTRA 

450 

BEAL*4 

IPOT,IPOTAD 

NTRA 

460 

IHTEGER*4 

ISTEGEB*4 

INTEGER*4 

INTEGEB*4 

INTEGER+2 


INDEXA  (10) 


RTSH, 

IT  ABl  (9) 

DONECB,OSECB,TIMINT 
ITABP(9) ,TABNUM, ITNAH (9) 

ITRAA  (50)  ,ITRNA  (50)  ,ITRI  A (50) 
INTEGER  + 2 LOCAT (20) ,LOOPN  (20 ) 

INTEGEB^2  DEVICE  (21) , lORDES^ IMODE ( 20) 
INTEGER*2  DACNUM  , A DCNUH  , DACPLA  (48 ) iADCPLA-fUS) 
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NTRA 

NTRA 

NTRA 

NTRA 

NTRA 

NTRA 

NTRA 

NTRA 


470 

480 

490 

500 

510 

520 

530 

540 
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INTEGEF*2  N AM  C A C (4  8)  , N AB  A DC  (48  ) , I D AC  (4  8 ) , IA.DC  (48) 
DIMENSION  JDATE(3) 

DIMENSION  ATRACK(2000) 

DIMENSION  EVAI.UE(2) 

DPMENSION  TVALUE(2) 

EQOIV  AIENCE  ( EV  AUJ  E ( 1 ) , Z DU  M B Y ( 1)  ) 

EQUIVALENCE,  (BVALUE(I) ,IVALUE(1)) 

EQUIVALENCE  (OPT  10  N ( 1 ) , NX)  ,(  OPT  ION  (2)  , NIC) 

1 (OPTION  ( 4)  ,NADCA)  , ( OPTI  0 N ( 5)  , ND  ACA) 

(OPTION!  8),NBES) 
(OPTION(  1 1)  , BESET) 


2 (OPTION  ( 7)  ,NII) 

3 (OPTION  (10)  , NPESR) 

4 (OPTION  (13)  ,NMULT) 

EQOIV  AIENCE  (AS  EIT  ( 1)  , 

1 (ASELT  ( 4)  ,NTESTO) 

2 (ASELT(  7)  ,NTABLB) 

3 (ASELT  (10)  , NADCL) 

4 (ASELT  (13)  ,NTM) 


, (0PTICN(  14)  ,NXM) 


, (OPTION  (3)  , NTEBM) 
(OPTION!  6)  ,NFF) 
(OPTION!  9),NTESTP) 
(OPTION (12) ,REBOVE) 
(0PTICN(15) ,NOOPT) 


NTIMC)  , (ASELT  ( 2)  ,NDUHP ) , (ASELT  ( 3),NSTD) 


(ASELT  ( 5)  *NLA) 
(ASELT  ( 8)  ,NPLOT) 

( ASELT(1  1)  ,NSAMPL) 
(ASELT(14)  ,NSTAT) 


(ASELT  ( 6)  ,NTRACK) 
(ASFLT  ( 9)  , NDACL) 
(ASELT  (12)  ,NNPC) 

( AS  ELT  (1  5)  , NUOTI ) 


NTR  A 
NTRA 
NTR  A 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTR  A 


NTR  A 

rtf  ^ ******’¥*  ***********’*(********’¥*****■ 

NTRA 

BLANK/’  •/ 

OUTNAM/’STD’ TABLE’, 17*’  •/ 

DEVICE/2,2,3,  17*0/ 

IMODE/1 ,1, 3,17*0/ 

UNNAM/’^L ’,  'T ',  • E.  . . . 

MODENA/’S ’,  ‘XEQ ’ , *M..  . 


DATA 

BATA 

DATA 

DATA 

DATA 

BATA 


V 

% 


‘A 


/ 


DATA  OFTION/’X’ , ' IC* , • T ER M ' , ’ ADC A ' , • D ACA ' 


1 


DATA 

DATA 

1 

2 

CALL 

CALL 


DUMP' , 'STD', 


i i 1''  f 

’ UOPT ' , 5*’ ZZZZZ2ZZ' / 
RETURN/'  ’/ 

ASELT/' T+D’ , ' 

• CACL’  , ’ ADCL' , 

LOAD  JPATE  ARRAY 
WRITE  TIME  AND  DATE 
IDATE  (JDATE) 

TIMDAT  (JDATE, ITTY) 


' F’ 

, * MULTI', 'XM ' , 


• I ' , 'MES  ’ , 


' LA* 

•SAMPLE'  , 'PC' , 'TM ' , ' STAT’ 


•TRACK' , 'TABLE' , ' PLOT' 
' UOUTI '/ 


C 

C**** 

C 

c **♦ 

C * 

C * 0 

c ♦ 


NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTR  A 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 
NTRA 

****************^******^4*************^******^frlf^^>J<^f^ 

NTRA 

^ NTRA 

* NTRA 

FTION  TEST  * - ENTER  A NAME  FROM  KEYED  (OPTEST)  NTRA 

♦ NTRA 

NTRA 
NTRA 

EXECUTI NTRA 
ARRAY  ANTRA 
INITIALNTRA 
NTRA 


c 

c 

c 

1 

IF 

OPTEST 

IS 

AN 

OPTION 

KEYWOR 

c 

2 

IF 

OPTEST 

IS 

AN 

OUTPUT 

KE YSOR 

c 

3 

IF 

OPTEST 

IS 

IN 

THE  AN 

AHE  ARE 

c 

4 

IF 

OPTEST 

IS 

EQUAL  TO 

BESET 

c 

5 

IF 

NONE  OF 

TH 

F 

ABOVE  ENVOKE  E 

D PASS  CONTROL  TO  OPTION 
C PASS  CCNTBOL  TO  OUTPUT 
AY  WRITE  ITS  PRESENT  AND 
GO  TO  RESET  ROUTINE 
RROR  MONITOR 


8749  WRITE (ITTY, 8754) 

8754  FORMAT  (1H0,' OPTION  •) 

READ (KEYBD, 1031)  OPTEST 
1C31  FORMAT  (1A8) 

8450  CONTINUE 
LSTART=1 
LAST=80 
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7" 


NTRA 

NTRA 

NTRA 

NTRA 

NTRA 

NTRA 

NTRA 

NTRA 

NTRA 

NTRA 


550 

560 

570 

500 

590 

600 

610 

620 

630 

640 

650 

660 

670 

680 

69C 

700 

710 

720 

730 

74C 

750 

760 

770 

780 

790 

800 

810 

820 

830 

840 

850 

860 

870 

880 

890 

900 

910 

920 

930 

940 

950 

960 

970 

980 

990 

1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 

1090 

1100 

1110 

1120 

1130 

1140 


non 


NTRA1150 
NT  B A 11  r>  0 
NTK  A1 170 
NTR A 1 1fi0 
RTBA1190 
HTRA12C0 
NTRA1210 
NTR A1220 
NTPA1230 
NTR A1240 
NTR A 1250 

C NTPA1260 

t **********  210 

c 
c 
c 

C 
C 
C 


8756 


8765 

C 

10C0 


CO  8756  TOR=1,20 

IF  (OPTION  (lOR) . EQ. OPTEST)  GO  TO  0758 
CONTINUE 

CO  8765  IS=1,15 

IF  (OPTEST. EO.ASELT  (IS) ) GO  TO  720 
CONTINUE 

WRITE  (ITTY,  1000) 

FORMAT  (1H0,»  ERROR  “ OPTION  NOT  POUND  - RENTER  •) 
GO  TO  8749 


CONTPOL  IS  PASSED  FROM  OPTION  TEST 


ill**  it  t**  **■¥**** 

♦ ♦ 

♦ OPTION  EXECUTIVE  * 

♦ * 

8758  CONTINUE 

C IF  OPTEST  IS  EQUAL  TO: 

C 1 X - TRANSFER  CONTROL  TC  EXECUTION  REGION 

I CONTROL  TO  EXECUTION  REGION 
TRANSFER  CONTPCL  TO  OUTPUT  ARRAY  ASSEMBLER 
F (SETUP  END-OF-RUN  OUTPUT) 

K (SETUP  DURING  RUN  DATA  COLLECTION) 

(IIST  ARRAY  VALUES) 

(OUTPUT  TIME  AND  DATE) 

(STANDARD  OUTPUT) 

(OUTPUT  ALL  VARIABLES) 

LE  (SETUP  FOR  REAL-TIME  DATA  COLLECTION) 

C 4 TERM  - TRANSFER  CONTROL  TO  TERMINAL  REGION 

C 5 ACCA  - ALTER  ACC  ARRAY 

C 6 DACA  - ALTER  DAC  ARRAY 

C 7 F - FLOATING  POINT  OPERATIONS 

C 8 I - INTEGER  OPERATIONS 


c 

2 IC  - 

TRANS 

c 

3 OUTPUT  - T 

c 

A) 

T APL 

c 

B) 

TRAC 

c 

C) 

LA  ( 

c 

D) 

T4-D 

c 

F) 

SID 

c 

F) 

DUMP 

c 

G) 

SAMP 

NTR A120O 
NTR A1290 
NTR A1 100 
NTRA1310 
NTR  A 1320 
NTRA1330 
NTR A1340 
NTR A 1 350 
NTR  A 1360 
NTR A1370 
NTR A 1 380 
NTRA1390 
RTPA  1400 
NT  R A 1 4 1 0 
NTPA1420 
NTRA143C 
NTK A 144  0 
NTR  A1450 
HTR A 1460 
NTRA1470 
NTR  A 1480 
NTRA  1490 
NTPA1500 


C 

9 

MES  - S 

END  MESSAGE  TO  LINE  PRINTER 

NT  R A 1 5 1 0 

c 

10 

TEST  - 

EXECUTE  TEST  ROUTINE 

NTRA1520 

c 

11 

RE-STR 

- RESTARTS  (READS  IN  NEW  DATA) 

NTRA1530 

c 

12 

RESET  - 

LOADS  OUTPUT  NAME  ARRAY  WITH  BLANKS 

NTRA1540 

c 

13 

REMOVE 

- REMOVES  NAMES  FROM  OPTION  LIST 

NTR A 1550 

c 

14 

MULTI  “ 

SETS  UP  MULTI  RUN  LOOP  6 VARIABLES 

NTRA1560 

c 

15 

XM  - TR 

ANFER  CONTROL  TC  EXECUTION  REGION  FOR  MULTI  RUNS 

NTRA1570 

c 

16 

UCPTICN 

- USEE  OWN  OPTION  SUBROUTINE 

NTRA1580 

c 

NTRA1590 

IF  (OPTEST.  EQ 

.NX)  GO  TO  8802 

NTRA1600 

IF (OPTEST. EQ 

.NIC)  GO  TO  0802 

NTRA1610 

IF  (OPTEST. EQ 

.NXH)  GC  TO  8802 

NTRA1620 

41*4: 

C #«* 

5000 


IF  (OPTEST. EQ.NTERM)  GO  TO  8809  NTRA1630 

IP  (OPTEST. EQ. RESET)  GO  TO  8230  NTHA164C 

IF  (OPTEST. EQ. BEHOVE)  GO  TO  8234  NTRA1650 

IF  (OPTEST. EQ.NRESR)  RETURN  1 NTEA1660 

NTRA  1670 

4c  4<  4:  * 4: 4>  4:  4i  4:  4:  4c  4:  4:  * 4c  * 4>  4:  * 4>  * 4t  4t  4: 4<  « * 4>  * * 4:  4:  * 4<  4<  4>  4:  * 4(  4>  4>  4>  4i  * 4:  * 4:  4>  4i  4>  4>  4: 4:  * 4:  * 4: 4i  4i  « 4>  4<  4>  4: 4:  * 4i  N T R A 1 6 8 0 

NTRA  169C 

IF  (OPTEST. HE. NADCA)  GO  TO  5000 
#♦ ADC  ROUTINE ##♦## 

CALL  ACCA (ADCNUH, NAM ADC, I ADC,S CAL  AC, ADCPLA , ITT Y , KE YBD ) 

CONTINUE 

IF  (OPTEST. NE. Nil. AND. OPTEST. NE.NFF)  GO  TO  5010 


NTRA1700 
NTR A171C 
NTR A1720 
NTRA1730 

ixmn  % ^ nu  r 
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C ##### ALTER  OR  READ  DATA  LIST  ##### 

CALL  RDHRT  (OPTEST) 

5010  CONTINUE 

IF (OPTEST. NE.NDACA)  GO  TO  5020 

C t####-*  — DAC  ROUTINE ##### 

CALL  DACA  ( D ACNU M, N AMD AC, I D AC, S CAL  DC, D 
5020  CONTINUE 

IF (OPTEST. NE. NMES)  GO  TO  5035 

C ##### MESSAGE  ROUTINE 

CALL  MESRTN  (ITT.Y,  KEYED,  RET  URN,  LPT  R) 
5035  CONTINUE 

IF (OPTEST .NE .NN ULT)  GO  TO  5040 

C ##### MULTI  PUN  ##### 

CALL  MULTRN  (ITTY, lOCAT , LOOFN, VALHR, FI 
5040  CONTINUE 

IF (OPTEST. NE. NTESTP)  GO  TO  5050 

C ##### TEST  OPTION  ####♦ 

CALL  T ESTP (KEYED, ITTY, NCCM, CRN AME, lORD 
5050  CONTINUE 

IF (OPTEST. NE.NUOPT)  GO  TO  5070 

C ###■## USER  OPTION  SUBROUTINE ##### 

WRITE  (ITTY, 8764) 

5070  CONTINUE 

GO  .TO  8749 
C 

C 

c * * 

C ♦ OUTPUT  ARRAY  ASSEMBLER  * - CALLED  FROM  T 

C * ♦ 

ic**  *********************** 

C 

720  WRITE  (ITTY,  700) 

700  FORMAT(1H  , • UNIT , M CCE • ) 

CALL  UNFORM(5,1) 

DO  705  IOU=1 ,3 

IF  (UNNAH  (lOU)  .EQ.  NAMEA  (1)  ) GO  TO  7 10 
705  CONTINUE 

WRITE  (ITTY, 715) 

715  FORMAT(1H  FOR  UNIT  ENTER  L (LIN  PT) 
GO  TO  720 

710  DO  725  MODE- 1,4 

IF  (MODENA  (MODE)  .EQ  .NAMEA  (2)  ) GO  TO  730 
725  CONTINUE 

WRITE  (ITTY, 7 35) 

735  FORMAT(1H  , * FOR  MODE  ENTER  A (ALL),  S 
1 XEQ  (EXECUTION)  •) 

GO  TO  720. 

730  CONTINUE 
C 

IF (OPTEST .NE. NLA)  GO  TO  2005 

C ♦#### ARRAY  SET  UP  ##♦# 

CALL  ARAST 
2005  CONTINUE 

IF (OPTEST. NE.NTABLE)  GO  TO  2010 

C ##### TABLE  SET  UP  ##### 

CALL  TABLES  (ITTY, KEYED) 

2010  CONTINUE 

IF  (OPTEST.  NE.  NTFACK)  GO  TO  2020 


ACPLA,ITTY, KEYBD) 


NLMR,ICT,IRUNS) 


ER, BVALUE,RSVAL,REALT) 


NTRA1750 
NTRA1760 
NTR  A 1770 
NTRA1780 
NTRA1790 
NTRA1800 
NTR A1810 
NTR A 1820 
NTR A1830 
NTRA1840 
NTRA1850 
NTR  A1860 
NTEA1870 
NTR A1880 
NTR  A 1890 
NTRA1900 
NTR A1910 
NTRA1920 
NTR A1930 
NTRA  1940 
NTR A 1950 
NTR A1960 
NTPA1970 
NTR A1980 
NTRA1990 

NTR A2C10 
NTRA2020 
NTRA203C 

HE  OPTION  TEST  OR  EXECUTIVE  NTRA2040 

NTRA2050 
NTR A2060 
NTR A2070 
NTR A2080 
NTR A2090 
NTR A2100 
NTRA2110 
NTR A2120 
NTR A2130 
NTR A2140 

, T (TELE),  B (BOTH)')  NTRA2150 

NTBA2160 
NTRA2170 
NTR A2180 
NTRA2190 
NTRA2200 

(SING.),  M (MULTI),  STRA2210 

NTRA2220 
NTR A2230 
NTR A2240 
NTRA2250 
NTRA2260 
HTRA2270 
NTR  A2280 
NTRA2290 
NTRA2300 
NTRA2310 
NTR A2 320 
/ NTBA2330 

NTRA2340 
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C ### 

2C20 

C ### 

20  30 
C ### 


670 

741 

745 

740 


C ### 

8234 


350 


7350 

### 


8230 

8231 

C 

C 

c ♦ 

C * E 

C ♦ 

C 

8802 

C 

C 

C 

c 

c 

c 

c 

c 

c 

c#### 

c 


## TBACK  ROUTINE  —»-###♦# 

CALL  TRACKS {ITTY,KEYBD,DT) 

CONTINUE 

IF(OPTEST.NE.NSAflPI)  GO  TO  2030 

REAL  TIME  SAMPLE  SETUP  SUBROUTINE  ##### 

WRITE(ITTY,8764) 

CONTINUE 

#f SET  up’  OUTPUT  NAME  ARRAY #♦### 

IE{MCDE.NE.2)  GO  TO  670 
CUTNAM  (21 ) =OPTEST 
DEVICE (21) =100 
GO  TO  8253 
DO  741  JJ=1,20 

IF  (OOTNAM  (JJ)  .EQ.OPTEST)  GO  TO  740 

CONTINUE 

DO  745  JJ=1,20 

IF  (OUTNAM (JJ)  .EQ. BLANK)  GO  TO  740 
CONTI  NOE 

OUTNAM  (JJ) =OPTEST 
IHODE  (JJ)  =HODE 
DEVICE  (JJ)  =ICU 
GO  TO  874  9 

## REMOVE  SINGLE  VARIABLE  ##### 

CONTINUE 
WRITE  (ITTY,  350) 

FORMAT(1H  ,'WHAT») 

READ(KEYBD, 1031)  OPIEST 
DO  7350  1=1,20 

IF  (OUTNAM  (I)  .EQ.OPTEST)  OUTNAM  (I)  =ELANK 

CONTINUE 

GO  TO  8749 

## RESET  OUTPUT  NAME  ARRAY  ##### 

LOAD  OUTPUT  NAME  ARRAY  WITH  BLANKS 

DO  8231  1=1,20 

OUTNAM  (I)  =BLANK 

CONTINUE 

GO  TO  8749 

4 « 4<  * 4c  4=  4i  4<>l> 

♦ 

7ECUTION  REGION  ♦ - CONTROL  IS  TBANSFERED  FROM  OPTION  EXECUTIVE 

♦ 

CONTINUE 

1 FILL  BVALOE  ARRAY  WITH  INITIAL  CONDITIONS 

2 SET  POTS 

3 SET  DACS 

4 EQUIVALENCE  + STORE  IC 

5 IF  REAL  TIME  IS  CALLED  ENTER  FLAGE 

6 WRITE  TIME, CATE,  AND  RUN  NUMBER 

7 CHANGE  ANALOG  MODE 

***********************  ****7|H^^^*^t^^^*  If 

---  RUN  COUNTER  LOGIC  ##### 

IF(OPTEST.EQ.NIC)  GO  TO  170  ^ ' 

L8UNS=IRUNS*1 

ITRONS=ITRUNS+1 


NTEA2350 
NTB A2360 
NTRA2370 
NTR A2380 
NTRA2390 
NTR A2400 
NTR A24  10 
NTR A2420 
NTR A2430 
NTRA244C 
NTR A2450 
NTB A2460 
NTR A247C 
NTR A2480 
NTR  A2490 
NTRA2500 
NTR A2510 
NTR A2520 
NTRA2530 
NTR A254C 
NTRA2550 
NTR A2560 
NTRA2570 
NTRA258C 
NTR  A2‘='90 
NTRA2600 
NTRA2610 
NTRA2620 
NTRA2630 
NTR A264C 
NTRA265C 
NTRA2660 
NTRA267D 
NTB A2680 
NTRA2690 
NTB A27CG 
NTRA2710 
NTR  A2720 
NTRA2730 
NTRA2740 
NTB A275C 
NTRA2760 
NTR  A2770 
NTR A2780 
NTH A2790 
NTR A2800 
NTB A2810 
NTR  A2820 
NTRA2830 
NTRA2840 
NTRA2850 
NTRA2860 
NTR A2870 
NTRA200O 
NTRA2890 
NTB A2900 
HTRA2910 
NTEA2920 
NTRA2930 
NTRA2940 
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\ 


170  CONTINUE 
C 

C ♦ * 

C#####---  FIRST  nOLTI  RUN  VARIABLE  INITIALIZATION  PASS  ####♦ 

C * ' ♦ 

Q ^ri,l^t******4******** 

IF{ICT.EQ.O,OR.OPTEST.NE.NX«)  GO  TO  165 


DO  16 

0 1=1, ICT 

IF  (LP 

UNS. IT. LOOPN 

( 

I)  ) GO 

TO  160 

KTEMP 

=IRUNS-LOOPN 

( 

I) 

BV  ALU 

E (LOCAT  (I)  ) = 

V 

ALMR  (I) 

♦ FLOAT  (KTEMP)  ♦FINLMR  (I) 

160 

CONTI 

NUE 

165 

CONTI 

NUE 

###: 



USER  INITIAL 

I 

ZATION 

SUBROUTINES 

EETUR 

N 2 

ENTRY 

NTHAT1 (♦, ♦, 

♦ 

,♦) 

4r4>4c*4i4i4<4^4>« 

C ♦ * 

C##### SECOND  PASS  FOE  MULTI-RUN  VARIABLE  REINITIALIZATION  ##### 

C * ♦ 

IF(ICT.EQ.O.  CR.OPTEST.NE.NXM)  GO  TO  155 
, DO  .150  1=1  ,ICT 

IF (LRUNS.LT.LOOPN  (I) ) GO  TO  150 
KTEMP=1RU  NS-IOOFN (I) 

RVALUE  (LOCAL  (T)  ) = V A I MR  ( I ) + P lOA  T (KT  EM  P)  *FINLHR  (I) 

150  CONTINUE 
155  CONTINUE 
C 

C 

C THIS  ROUTINE  SETS  ECTS  ON  680 

C 

IF (REALT.LT.  .5)  GO  TO  75 
BO  1702  1=1,120 

IF  {IPOT  (I)  .EQ.IPOTAD  (I)  ) GO  TO  1702 
CALL  PCTCHK (I,IEOT  (T)  ,3,681  52,88152) 

IPOTAD  (I)  =IPOT  (I) 

17C2  CONTINUE 
75  CONTINUE 
C 

C THIS  CALL  PLACES  THE  680  IN  IC 

C 

CALL  S AMO  (6, IS AMOE) 

IKEEP  = ISAMP  - 1 
PASS  = ASAMPl 
IDACK=0 
lADCK  = 0 
JI  N=0 

IF(OPTEST.EO.NIC)  GO  TO  8749 
C 

CALL  MAITBU  (200) 

C 

IF  (LRUNS.GT.  1)  GO  TO  1888 

CALL  TTHDAT  (JCATE,  ITTV)  - - - 

CALL  TIHDATC JDATE, IPTR) 

C 

WRITE  (LPTR, 9050)  ITRUNS 
WRITE(ITTY,9C50)  ITRUNS 


NTR 

A2950 

NTR 

A2960 

NTR 

A2970 

NTR 

A290O 

NTR 

A2990 

NTR 

A3000 

NTR 

A3010 

NTR 

A3020 

NTR 

A3030 

NTR 

A3040 

NTR 

A3050 

NTR 

A3060 

NTR 

A3070 

NTR 

A3080 

NTR 

A3090 

NTR 

A3100 

NTR 

A3110 

NTR 

A3  120 

NTR 

A3130 

NTP. 

A31U0 

NTR 

A3150 

NTR 

A3160 

NTR 

A3170 

NTR 

A3180 

NTR 

A3190 

NTR 

A3200 

NTR 

A3210 

NTR 

A3220 

NTR 

A3230 

NTR 

A32'iC 

NTR 

A3250 

NTR 

A3260 

NTP 

A327C 

NTR 

A320O 

NTR 

A3290 

NTR 

A3300 

NTR 

A331C 

NTR 

A3320 

NTR 

A3330 

NTR 

A3340 

NTR 

A3350 

NTR 

A336C 

NTR 

A3370 

NTR 

A3380 

NTR 

A3390 

NTR 

A3400 

NTR 

A3410 

NTR 

A3420 

NTR 

A343C 

NTR 

A3440 

NTR 

A3450 

NTR 

A3460 

NTR 

A347C 

NTR 

A3480 

NTR 

A3490 

NTR 

A3500 

NTR 

A351C 

NTR 

A3520 

NTR 

A3530 

NTR 

A3540 

non 


9050  FORHAT  (1H0  , • aOH  %I3^»  HAS  STAfiTEDVIHO^ 
1 'OUTPUT  BELOW) 

1888  CONTINUE 

CALL  CIOCK  (HTIHE1) 

4i  :jc ^ 


♦ ♦♦  * ♦ 


c#### 
c * 


c ♦ 
c 
c 
c 

C-"- 


C-“““ 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c **♦ 
c 


-«««»« 


1 


IS  ACTIVATED 


ENTER  REAL  TIME  PART 
IBEALT  = 0 

IF {REALT.GT. .5)  IREAIT  = 

IF (RE  AIT. GT. .5)  IRT=1 
* 

AT  THIS  POINT  THE  RTHON  SUBPROGRAM 
RTMON  INTURN  EXECOTS  THE  HODIE 


RETURN  3 
ENTRY  NTRAT2 

WHEN  EXECUTION'T AKES  PLACE  THE  FOLLOWING  TAKES  PLACE: 

1 REAL  TIME  PRECBNT  IS  CALCULATED 

2 CHANGE  ANALOGS  MODE 
1 CALCULATE  BUN  HODS 

4 EXECUTE  SELECTED  OUTPUTS  FOR  GIVEN  MODE 

B MOCF=3  FOR  HULTI“RUN 
A MODE=1  FOR  SINGLE  RUN 

5 IF  MODE  IS  EQUAL  TO  TWO  GO  TO  OPTION  TEST 
IN  MULTI-RUN  IRUNS  IS  CREATOR  THAN  LRUNS 
ENT  VARIABLES  SELECTED 
E NEXT  RIJN 
NS=0,  IRUNS=1 
ON  TEST 


6 

IF  PROG 

RAM 

IS 

A 

IN 

CRE 

B 

EX 

ECU 

7 

END  0 

F 

RUN 

LR 

8 

RETUR 

N 

TO 

OPT 

**  >ii4‘Kc4c 

CALL 

CLOCK 

(NTIM 

E2) 

NRTIME=NTI 

HE2-NTIM 

IF  (NRTIME. 

GT 

. 1) 

RT 

MODE= 

= 1 

IF  (OPTEST. 

EQ 

.NX 

M) 

CONTINUE 

4c:^:4c4c^)«sti4cilc4( 

8253 

C ♦** 

C * 

C ♦ OUTPUT  REGION 
C ♦ 

DO  8943  1=1,20 

IFR=1 

ILA=2 


1=20 

GO  TO  550 
555  IF(IMODE(I) 
IF  (IHODE  (I) 
GO  TO  894  3 


MODE=3 


- CONTROL  IS  TRANFERED  FROM  OPTION  RUN  EXECUTIVE 


NTRA3550 
NTPA3560 
NTBA357C 
NTEA3580 
HTRA3590 
HTRA3600 
NTR A3610 
NTRA3620 
NTRA3630 
NTRA3640 
NTRA3650 
HTRA366C 
NTRA3670 
NTR A3680 
NTRA3690 
NTR A3700 
NTR A3710 
NTRA3720 
NTR A3730 
NTRA3740 
NTR A3750 
NTRA3760 
NTBA3770 
NTRA378C 
NTRA3790 
NTR A3800 
NTRA3810 
NTRA3820 
NTEA3830 
NTR  A3840 
NTR A 3850 
NTRA3860 
NTRA3870 
NTRA3880 
NTRA3890 
NTRA3900 
NTR A3910 
NTFA3920 
NTRA3930 
NTR  A3940 
NT  BA  39  5 0 
NTRA3960 
NTS A397C 
NTRA3980 
NTEA3990 
NTRA4000 
NTRA4010 
NTRA4020 
NTRA4030 
NTR  A4040 
NTRA4050 


2)  GO  TO  555 

NTR A4060 

H (21) 

NTR A4070 

1).EQ.1)  ILA=1 

NTRA4080 

1)  .EQ.2)  IFR=2 

NTRA4090 

NTRA4 100 

HTRA4110 

.EQ.4)  GO  TO  560 

NTRA4120 

. EQ.  MODE)  GO  TO  560 

NTRA4130 
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NTRA4140 


7" 


560  CNAnE=oUTN  AH  (I) 

NTR  A4  150 

IF  (CNAHE. EQ.  BLANK)  GO  TO  8943 

NTRA4160 

IF  (DEVICE  (T)  .EQ.  1)  ILA=1 

NTR A4170 

IF  (DEVICE  (I)  . EQ.  2)  IFR=2 

HTRA4180 

550  CONTINUE 

NTRA4190 

DO  8946  K=IFB,ILA 

NTR A4200 

IF(K.SQ.I)  MOPU=LPTB 

NTRA4210 

IF(K.EQ.2)  'hOPU  = ITTY 

NTR A422C 

IF  (CNAME.  NE.  NADCL)  GO.  TO  3000 

NTRA4230 

C##### LIST  ADC  AR.PAY #!### 

NTRA4240 

CALL  LSTADC(ADCNDM,M0PU,IADC,SCALAC,NAHADC,0PNAHE) 

NTRA4250 

GO  TO  8946 

NTRA4260 

3C0C  CONTINUE 

NTR A4270 

IF  (CN AMF. NE. NDACL)  GO  TO  3010 

NTR  A428C 

C##### LIST  DAC  array  ##### 

NTRA4290 

CALL  LSTDAC (DACNUM  ,HOPU,IDAC,SCALDC,NAMDAC,ORNAHF) 

NTR  A4  30C 

GO  TO  8946 

NTRA4310 

3010  CONTINUE 

NTR  A4320 

IF  (CNAHF. NE. NDOHP)  GO  TO  3020 

NTR A4330 

C##### DUMP ##«## 

NTRA4340 

CALL  DUMP  (MOPU, NCCM,IORDER,CRNAME,BVALUE) 

NTR  A 4 350 

GO  TC  8946 

NTRA4360 

3C2C  CONTINUE 

NTR  A4  370 

IF  (CNAME. NE. NLA)  GO  TO  3030 

NTRA4380 

C##### LIST  ARRAYS  & VALUES  ##### 

NTR A439C 

CALL  ARAWT  (MCFU  , BV  ALUE,  ORN  AME) 

NTR A4 400 

GO  TO  8946  . 

NTR A4410 

3C30  CONTINUE 

NTRA4420 

IF (CNAME. NE.NNPC)  GO  TO  3040 

NTR  A4430 

C##### SPECIAL  FEOGFAM  END  OF  RUN  DATA  ##### 

NTR A4440 

WRITE  (ITTY, 8764) 

NTR A4450 

GO  TO  8946 

NTR A446C 

3C4G  CONTINUE 

NTRA4470 

IF  (CNAME. NE. NPLOT)  GO  TO  3050 

NTR  A4480 

C##### PLCTING  SUBROUTINE  ####♦ 

NTR A449C 

WRITE  (ITTY,8764) 

NTRA4500 

GO  TO  8946 

NTR A4510 

3C50  CONTINUE 

NTRA4520 

IF  (CNAME. NE. NSTAT)  GO  TO  3060 

NTR A4530 

WRITE  (ITTY, 8764) 

NTR  A454C 

GO  TO  8946  . 

NTRA4550 

3C6G  CONTINUE 

NTRA456C 

IF  (CNAME.  NE.  NSTD)  GO  TO  3070 

NTR A4570 

C#####- — STANDARD  OUTPUT  SUBROUTINE 1#### 

NTRA4580 

CALL  QSTD(MOPD) 

NTRA4590 

GO  TO  8946 

NTRA460C 

3C70  CONTINUE 

NTRA4610 

IF (CNAME. NE. NTABLE)  GO  TO  3080 

NTRA4620 

C##### TABLE  OUTPUT  ##### 

NTSA4630 

CALL  TABLEO  (MOP U , 0 R N AME , LRDNS , ITRU NS , B V AID E) 

NTR A4640 

GO  TO  8946 

NTR A4650 

3080  CONTINUE 

NTRA4660 

IF  (CNAME. NE.NTESTO)  GO  TO  3085 

NTRA467C 

C##### TEST  VALUE  OUTPUT  ##### 

NTRA4680 

WRITE ( ITTY,8764) 

NTRA4690 

GO  TO  8946 

NTR A47CC 

3085  CONTINUE 

NTRA4710 

IF  (CNAME. NE. NTIMD)  GO  TO  3090 

NTR A4720 

C##### DATE ###♦♦ 

NTRA4730 

CALL  TIHDAT(JDATE,HOPU) 

NTR A4740 

\ 


GO  TO  8946 
3C90  CONTINOE 

IF(CNiHE.NE.NTM)  GO  TO  3100 

C##### EBBOB  MCNITCB  OUTPUT  — -##### 

CALL  EEHONT(MOPU,OBSA?IE,PHIflAX) 

GO  TO  8946 
3100  CONTINUE 

IF  (CNAME.  NE.  NTBACK)  GO  TO  3110 

C####t TRACK  OUTPUT  ---##♦## 

CALL  TRACO (KOPU, GRNAME, DT) 

GO  TO  8946 
3110  CONTINUE 

IF  (CNAME. NE. NUOT1)  GOTO  3120 

C##### USER  OUTPUT  OPTION  1 »--■##### 

WRITE (ITTY, 8764) 

GO  TO  8946 
3120  CONTINUE 
8946  CONTINUE 
8943  CONTINUE 

8764  FORMAT  (1H0 , ‘THIS  OPTION  HAS  NOT  BEEN  PROGRAMED  YET‘) 

IF(MODE.EQ.2)  GO  TO  8749 
IF  (OPTEST, EO. NX)  GO  TO  8152 
815C  IF  (IPUNS. EQ. LRUNS)  GOTO  8152 
, GO  TO  8802 
8152  CONTINUE 
LEDNS=0 
GO  TO  8749 
C 

Q^,;t^********^  *****lif:iii  ******  ***i^*^*^^if  ******  ^***********^****  ********  ******** 

c 

C ******************* 
r * * 

C##### TERMINATE  ##### 

C ♦ ♦ 

Q ******************* 

8809  OSECB=0 

CALL  TIMDAT (JDATE, ITTY) 

IF{IRT.NE.1)  GO  TO  5607 
CALL  HPOST  (DONECB  , ‘BN  *) 

CALL  HAITRT  (CSECE) 

5607  CONTINUE 

WRITE (ITTY, 8821) 

8821  FORMAT  (1H0,  ' PROGRAM  TERMINATED*) 

CALL  RACN  (1,IRACNE) 

CALL  CHKIO 
CALL  WRTOFF 
CALL  RDOFF 
RETURN  4 
END 


NTR 

A4750 

NTF 

A4760 

NTR 

A4770 

NTR 

A4780 

NTR 

A4790 

NTR 

A4800 

NTR 

A481C 

NTR 

A4320 

NTR 

A483C 

NTR 

A4840 

NTR 

A4850 

NTR 

A486C 

NTR 

A4870 

NTR 

A488C 

NTR 

A4890 

NTR 

A4900 

NTR 

A4910 

NTR 

A4920 

NTR 

A 4 9 3 0 

NTR 

A4940 

NTR 

A4950 

NTR 

A496G 

NTR 

A4970 

NTR 

A4980 

NTR 

A4990 

NTR 

A5C00 

NTR 

A5010 

NTR 

A5C2C 

NTR 

A5030 

NTR 

A5040 

NTF 

A5050 

NTR 

A506C 

NTR 

A507C 

NTR 

A5080 

NTR 

A5090 

NTR 

A5100 

NTR 

A 5 1 1 0 

NTR 

A512C 

NTR 

A5130 

NTR 

A5  140 

NTR 

A5150 

NTR 

A5160 

NTR 

A5170 

NTR 

A5180 

NTR 

A519C 

NTR 

A 5 20  0 

NTR 

A5210 

NTR 

A5220 

NTR 

A5230 

I 

i 
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2 . 2 FUNCTIONS 

PRESENTED  HERE  IS  THE  FORTRAN  LISTING  FOR  THE 
FUNCTION  SUBPROGRAMS  CALLED  BY  THE  MODEL  SUBPROGRAM. 
THE  FOLLOWING  LIST  DETAILS  THE  FUNCTION  NAMES  AND 
THEIR  USE: 

FUNCTION  USE 


FF 

Calculation  of  Front  Wheel  Brake  Torque 

FR 

Calculation  of  Rear  Wheel  Brake  Torque 

FCSI 

Calculation  of  the  Wheel  Slip  Side  Force 
Shaping  Function 

PTBAK 

Calculation  of  a Caster  Trail  Function 

GETDEL 

Calculation  of  a rectangular  bump  grid 
for  VHTP  No.  3 

XINT 

Linear  Interpolation  of  Function  Values 
between  Input  Table  Data  Points 

AMIN 

Selection  of  the  Minimum  Value  between 
Two  Variables 

POLY 

Evaluation  of  a Fifth-Order  Polynomial 
Approximation  to  a Function 
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C FUNCTION  FF(P)  - CFUN  10 

FUNCTION  FF(P)  CFUN  20 

C THIS  FUNCTION  CALCULATES  THE  FRONT  WHEEL  BRAKE  TORQUE 

COMMON/NEWTBS/TQBF  (20)  ,PBF  (20)  ,TQBR  (20)  , PBR  (20)  , CFUN  30 

1 ,'F  A (20)  ,GAMF  (20)  , N1F,NTR,NFA  CFUN  UO 

Ff^XINT  (P, PPF,TQEF, NTF)  CFUN  00 

RETURN  CFUN  00 

END  CFUN  70 
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FUNCTION  FR(P)  ' CFUN  10 

FUNCTION  FR(P)  CFUN  20 

C THIS  FUNCTION  CALCULATES  THE  REAR  WHEEL  BRAKE  TORQUE 

COMWON/NEWTRS/TQBF  (20) ,PBF(20) ,TQBH(20) ,PBR(20) , CFUN  30 

1AFA(2':')  ,GAMF(20)  ,NTF,NTR,NFA  CFUN  U 0 

FR  = XINT  (P, PPR,TQER,NTR)  CFUN  50 

RETURN  ■ CFUN  60 

END  CFUN  70 
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C FUNCTION  FCSI  (GAMI  ,SLPI)  CFUN  10 

FUNCTION  FCSI (G AMI  ,SLPI)  CFUN  20 

THIS  FUNCTION  CALCULATES  THE  HHEEL-SLIP  SIDE  FCBCE 
SHAPING  FUNCTION 

if  * 4 *********************** 


CC  1MON/NEWTBS/TQBF  <20 ) , P BF  (20)  , TQ  B B (20)  ,PBR  (20)  , 

CFUN 

30 

1 4f  A (20)  ,GAMF  (20)  ,NTF,.NTB,NFA 

CFUN 

40 

THP=ABS (SLPI) 

CFUN 

50 

FCSI  = XINT  (TMP,GAMF,AFA,NFA) 

CFUN 

6C 

RETURN 

CFUN 

70 

END 

CFUN 

80 

i 
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SUBROUTINE  PTBA K (BET , PHI , AKKI, PTBI)  PTBA  10 

SUBROUTINE  P TBA K (B ET ,FR I , A K KI , PTBI ) PTBA  20 

**************  ******>t‘***********i^*******^f*i^******* 

C T’HIS  function  CALCULATES  CASTER  TRAIL 

(^4i4c4c4t:tM(i3tii4c;4<>t[4c#4i4i*4ci»:*4<!t(«4(4c**4i4i4<4i4<#«4i«4t«4i«4i4i4c4<*4>4ci^4^4i4'4i««4<4(«4i4c#4i«*4i«4e**4t*4>4i4i 


COMMON/PTBK/API , AP2, AP3, AP4, AP5,BTC1, BTC2 

PTBA 

30 

AP5=6  0''. 

PTBA 

40 

AKKI= tiP4+ FRI/AP5 

PTBA 

50 

TEMP=ABS(BET*57 ,29578) 

PTBA 

60 

PTBI=  API 

PTBA 

70 

IF  (T^MP.LE.BICI  ) RETURN 

PTBA 

80 

PTBI  = AP3 

PTBA 

90 

IF  (TEMP. GT.  BTC2)  RETURN 

PTBA 

100 

PTBI  = AP1* { 1 . 0- (TEMF-BTCI)  ♦AE2) 

PTBA 

110 

RETURN  . 

PTBA 

120 

END 

PTBA 

130 
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C FDNCTION  GETDEL {X,I,P5,NBHP) 

FUNCTION  GETCEL  (X,  I,  B5,  NEMP) 

******  t**if*^*****^  4***  **^**  *****************  *********** 

THIS  SUBROUTINE  PRODUCES  THE  BUHPS  FOR  VHTP  #3 

^f^*,^il^i^^***^****:lf**:if***iti*^Ai******  **************************  ************* 

COaaON/XBS/XB  (30)  , NS  (4,30)  ,DELX  (4)  ,XI  (4)  ,NNN 

CJHMON/XYZ/NUHBB 

DIHENSION  X(4) 

GETDEL=0.0 
CO  10  K=1,NBHP 
L=NBMP-K+1 

IF  (X  (I)  . IE.  XB  (L)  ) NS  (I,L)  =N0MBR  + NNN 
IF(X(I)  .GE.XB(L)  .AND.NUMBR.IE. NS(I,I))  GO  TO  20 
10  CONTINUE 
RETURN  • 

20  GETDEL=R5 
RETURN 
END 


CFUN 

10 

CFUN 

20 

CFUN 

30 

CFUN 

4C 

CFUN 

50 

CFUN 

60 

CFUN 

70 

CFUN 

80 

CFUN 

90 

CFUN 

100 

CFUN 

110 

CFUN 

120 

CFUN 

130 

CFUN 

140 

CFUN 

150 

CFUN 

160 
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FUNCTION  XINT  (ABG,  ABOTB, FUN, NP) 
FUNCTION  XINT (ABG, ARGTB,FUN,NP) 


CFUN 

CFUN 


10 

20 


THIS  FUNCTION  PERFORMS  LINEAR  INTERPOLATION  OF  FUNCTION 
‘VALUES  PETBEEN  INPUT  TABLE  EATA  POINTS 


DIMENSION  ARGTB  (NP)  ,FUN (NP) 

CFUN 

40  i 

DO  K i=1,NP 

CFUN 

50 

IF  (ABG -ARGTB  (I) .)  30 , 20 , 1 0 

CFUN 

60 

10 

CONTINUE 

CFUN 

70 

I=NP 

CFUN 

80 

30 

IF  (I.EQ.  1)  1 = 2 

CFUN 

90  , 

TEMP=  (AFG- ARGTB  (1-1)  )/  (ARGTE  (I)  - ARGTB  (1-1)  ) 

CFUN 

100  : 

XINT=FUN  (1-1)  + (FUN  (I)  -FUN  (1-1)  ) ♦TEMP 

CFU  N 

110  1 

RETURN  . 

CFUN 

120  ! 

20 

XINT=FUN(I) 

CFUN 

130  i 

RETURN 

CFUN 

140 

END 

CFUN 

150 

n n 


C 


CFUN 

CFUN 


FONCTION  AMIN(X,Y) 

FONCTICN  AMIN(X,Y) 

4^ 4c ♦ >l<  « >)> 4c « « >(< « « * « « * « « « « 4>  * 4n|> « « 4 4> « « « * « 4<  4< « 4c « « « « * « 


THIS  FUNCTION  SELECTS  THE  BTNIHUM  VALUE  BETWEEN  TWO  VARIABLES 
Q4c4c4c4c4c4c4c4c4c4c4c44e4c4i4c4c>)c44c4c4c4‘44c4c4c«4c4c4>4'44>4(4c4>444444c4444c4<44c4<4'4<4<4<4'4c4c4c4c4i444«44>4c4c>t<’l‘ 


IF  (X-Y)  1,1,2 

1 AHIN=X 
RETURN 

2 AMIN=Y 
RETURN 
END 


CFUN 

CFUN 

CFUN 

CFUN 

CFUN 

CFUN 


C FUNCTION  POLY  (Dl, TEL)  CFUN 

FUNCTION  POLY(DL,TBL)  CFUN 

«4i «««  4c « 4< « * 4>  « 4i  4< « 4> « « 4m(i  « 

C ,THIS  FUNCTION  EVALUATES  A FIFTH-ORDED  POLYNOMIAL 
C APPROXIMATION  TO  A FUNCTION 

Q4M(c4i4[*4i4c4c4c4<4‘4>4‘4c4<4i4‘4i4‘«4>4E4Mit4i*4(4>4>4'4>44«4i4*4>4<#<^4‘4t4ti^4>*>44i*4i*4>4E4'4>4i4t4i4i4>4i4(4>4>4‘4i4<4E4t4i 


DIMENSION  TBL(7)  CFUN 

TMP=TBL(7)  CFUN 

DO  10  1=1,6  CFUN 

THP=TMP*DL+TEL (7-1)  CFUN 

10  CONTINUE  CFUN 

POLY=TMP  CFUN 

RETURN  CFUN 

END  CFUN 


10 

20 


40 

50 

60 

70 

80 

90 
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3.  PRESENTED  HERE  ARE  THE  ANALOG 
COMPUTER  DIAGRAMS 
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NOTE:  V = VARIABLE  POT  SETTING 
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NOTE;  V=  VARIABLE  POT  SETTING 


Fig.  B-2  Analog  Computer  Diagram-Suspension  Forces  and  Deflections 
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Fig.  B-3  Analog  Computer  Diagram-Radial  Forces  and  Wheel-Slip  Lockup 
Logic 
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4.  PRESENTED  HERE  ARE  THE  SYMBOLS  AND  DEFINITIONS 


OF  THE  PROGRAM  PARAMETERS.  THE  ORDER  OF  THE 
PARAMETERS  CORRESPONDS  TO  THE  INPUT  DATA  CARDS. 
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SYMBOLS  AND  DEFINITIONS  OF  THE  PROGRAM  PARAMETERS 
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APPENDIX  C 

DESCRIPTION  OF  HYBRID  COMPUTER  SIMULATION  LABORATORY 
HYBRID  COMPUTER 

Figure  C-1  is  a diagram  of  the  APL/JHU  hybrid  computer 
system.  The  primary  units  are  the  analog  and  digital  com- 
puters, the  hybrid  control  and  data  interface,  the  hybrid 
operators  control  console,  and  the  remote  batch  station. 

Two  types  of  analog  computers  manufactured  by  Electronic 
Associates,  Inc.,  are  located  in  the  hybrid  laboratory  and 
the  portion  of  the  model  programmed  on  the  analog  computer 
is  divided  between  them.  The  entire  steering  system  is 
contained  on  an  EAI  231 -R  and  the  rotational  wheel  dynamics, 
circumferential  friction  coefficient  calculation,  tire  de- 
flection, and  suspension  dynamics  is  contained  on  an  EAI  680. 

The  hybrid  data  and  control  interface  permits  con- 
trol of  the  analog  computer  by  the  digital  computer  and 
exchange  of  data  between  the  analog  and  digital  computers , 
Data  communication  with  the  digital  computer  is  provided  by 
24  multiplying  digital-to-analog  converters  (MDAC's) , 24 
non-multiplying  DAC's  and  48  channels  of  analog-to-digital 
conversion  (ADC's).  The  system  contains  a control  interface 
which  allows  complete  control  of  the  680  analog  computer  and 
data  interface  via  Fortran  IV  callable  subroutines  by  the 
digital  computer  which  is  remotely  located  1000  feet  from 
the  hybrid  laboratory.  A detailed  description  of  the  APL/JHU 
hybrid  facility  is  presented  in  Appendix  C of  Reference  [3] . 
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Fig.  C-1  APL/JHU  HYBRID  COMPUTER  SYSTEM  BLOCK  DIAGRAM 
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The  digital  computer  is  an  IBM  360  Model  91 . This 
is  one  of  the  largest  and  fastest  computers  built  by  IBM 
and  is  characterized  by  the  following; 

Third  generation  hardware 

4 million  bytes  of  main  core  storage 

4 billion  bytes  of  random  access  storage 

Minimum  instruction  execution  time  of  60  nanoseconds 

Use  of  the  Operating  System  OS/MVT  (Multi-programming 
wirh  a Variable  Number  of  Tasks) . 

All  vehicle  model  calculations  not  assigned  to  the  analog 
computers  are  performed  digitally.  Simulation  coding  is 
performed  in  the  Fortran  IV  language. 

Since  the  hybrid  computing  facility  is  remotely  lo- 
cated from  the  digital  computer,  a remote  batch  terminal  is 
required  for  program  deck  submission  and  printing  of  digital 
output.  The  terminal  used  in  the  hybrid  laboratory  is  manu- 
factured by  Data  100  and  contains  a 
and  a 600  line/minute  printer. 

The  hybrid  operators  control 
display  system  consisting  of  a CRT, 

All  simulation  control  is  exercised 
lation  directives,  user  information 
and  simulation  output  appear  on  the 
used  to  ghost  print  everything  that 


600  card/minute  reader 

console  is  an  IBM  3270 
keyboard , and  printer . 
at  this  station.  Simu- 
input  via  the  keyboard 
CRT.  The  printer  is 
appears  on  the  CRT  so 
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that  user/computer  transactions  are  not  lost.  A very  power- 
ful and  flexible  set  of  coinmunication  routines,  designed  for 
simulation  use,  is  available  to  the  user  at  the  hybrid  opera- 
tors console.  The  software  that  services  the  hybrid  operators 
control  console  is  applicable  to  terminals  other  than  IBM  3270. 
Therefore,  remote  operation  of  the  simulation  via  a dial-up 
typewriter  of  CRT  type  terminal  from  a remote  location  is 
possible . 


if 
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APPENDIX  D 

INTERACTIVE  SUBROUTINES 

1.  ' INTRODUCTION 

A set  of  generalized  user  communication  subroutines 
has  been  added  to  the  HVHP  to  enhance  its  operation  by  engi- 
neers. A subset  of  these  routines  directly  aimed  at  the 
engineering  user  expedite  the  simulation  functions  of  chang- 
ing parameters,  selecting  variables  for  output,  performing 
parametric  runs,  and  general  simulation  control.  Another 
subset,  directed  toward  the  simulation  designer,  allows  tasks 
such  as  reassigning  and  rescaling  analog-to-digital  and  digital- 
to-analog  converters,  printing  the  current  values  of  all  digi- 
tal variables,  and  printing  selected  members  of  arrays.  The 
use  of  these  routines  has  allowed  easy  configuration  of  the 
HVHP  to  perform  the  vehicle  handling  test  procedures  (VHTP) 
and  to  calculate  the  vehicle  comparison  variables  (CV) . 

2 . SUBROUTINE  USE 

All  simulation  control  occurs  at  the  hybrid  operator's 
station  which  consists  of  a telecommunications  device  (tele- 
typewriter or  a CRT  with  keyboard) . Once  the  simulation  is 
active,  the  user  controls  simulation  activity  with  input  res- 
ponses to  the  OPTION  cue.  Each  input  selects  an  interactive 
routine.  Once  a routine  has  been  selected,  the  user  is  queried 
for  information  necessary  to  perform  the  task  of  the  selected 
routine.  When  the  routine  is  completed,  the  readiness  of  the 
simulation  for  the  next  routine  is  indicated  by  the  reappear- 
ance of  the  OPTION  cue.  Table  I lists  the  names  of  the  cur- 
rently available  interactive  subroutines. 
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TABLE  I 

INTERACTIVE  SUBROUTINE  LIST 


X (Execute  Single  Simulation  Run) 

XM  (Execute  Multi-run  Series) 

IC  (Initialize  Simulation) 

F (Read  or  Alter  Real  Variables) 

I (Read  or  Alter  Integer  Variables) 

DACA  (Alter  DAC  Array) 

ADCA  (Alter  ADC  Array) 

MULTI  (Setup  Multiple  Runs) 

TEST  (Test  Runs) 

MES  (Send  Message  to  Line  Printer) 

TABLE  (Setup  End-of-Run  Output) 

TRACK  (Setup  during  Run  Data  Collection) 
LA  (List  Array  Values) 

REMOVE  (Suspend  Output) 

T+D  (Output  Time  and  Date) 

STD  (Standard  Output) 

DUMP  (Output  All  Variables) 

DACL  (List  DAC  Array) 

ADCL  (List  ADC  Array) 

TERM  (Terminate  Program) 
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, In  general  the  routines  either  alter  simulation  data, 

provide  simulation  control,  or  provide  for  output  of  simula- 
tion data.  For  output,  the  information  may  be  directed  to 
the  hybrid  operators  station  (T) , the  system  line  printer  (L) 
or  both  (B) . Also,  the  output  can  be  specified  as  immediate 
(XEQ) , at  the  end  of  a single  run  execution  (S) , or  at  the 
end  of  each  run  in  a multiple-run  execution  (M) . These  out- 
put selections  and  their  codes  are  shown  in  Table  II. 

Table  II 

Data  Output  Selections 


Unit 

T = CRT 

L = System  Line  Printer 
B = Both  T and  L 


Mode 

S = Single  Runs  Only 
M = Multi-runs  Only 
A = Both  S and  M 
XEQ  = Immediately 


3 . INTERACTIVE  VARIABLES 


To  be  effective,  the  routines  must  access,  by  name, 
the  Fortran  variables  within  a simulation.  The  variables  of 
interest,  termed  interactive  variables,  need  only  appear  in 
a Fortran  named  COMMON  to  be  accessed.  Once  selected,  a vari- 
able can  be  given  any  number  of  aliases.  The  alias  capability 
is  particularly  important  when  an  interactive  variable  is 
an  array  member.  For  instance,  the  current  value  of  input 
brake  line  pressure,  which  is  stored  in  element  121  of  the 
PARAM  array,  has  been  given  the  alias  PFL.  Also,  the  PARAM 
array  has  been  given  the  shorter  alias  PRM.  A maximum  of  400 
interactive  variables  can  be  selected.  However,  it  is  impor- 
tant to  note  that  the  PARAM  array,  which  has  295  elements*, 
uses  only  one  interactive  variable  allocation.  Nearly  all 
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variables  which  are  associated  with  wheel  computation  (side 
force,  FSI;  normal  force,  FRI;  ground  patch  velocity,  CVI ; 
etc.)  are  addressable  as  arrays  and  use  only  one  interactive 
variable  allocation.  Currently,  300  interactive  names  have 
been  used  which  permit  the  interrogation  or  alteration  of 
more  than  900  Fortran  variables. 

Each  subroutine  is  discussed,  including  all  required 
inputs,  and  actual  user  examples  are  presented.  In  the  example, 
****  indicates  user  input.  The  remainder  is  computer  output. 
Although  it  is  not  presented,  the  routines  have  extensive  error 
handling  facilities  which  prompt  a user  when  errors  are  made. 

4 . SUBROUTINE  DESCRIPTIONS 

X (Execute  Single  Run) 

Purpose  - Perform  a single  simulation  run.  The 
simulation  is  automatically  initialized  (IC)  and  a 
run  performed. 

OPTION  when  the  run  is  completed  and  all  output 
has  been  printed. 

Example  - 

OPTION 

X 

JUNE  20  1974 

TIhE  1018:17.09 
RUN  5 HAS  STARTED 
OUTPUT  BELOU 

AXAV=  0.0  DECL  TIME=  O.GOG  AVCUR=  0.118  BTDMAX=  0.023  BTMAX=  0.007  DEL£<T=  O.GGu 
AYHAX=  0.154  PHII1AX=  1.502  RMAX=  G.Obb  LANE  CHNG  DEL=  0.0  DELPSI=  O.G  MAX  STEER=  27.927 
PTR0MAX=  0.0  RTRQMAX=  0.0 

OPTION  ^ 
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XM  (Execute  Multi-run  Series) 


Purpose  - Perform  a series  of  parametric  runs.  The 
simulation  is  automatically  initialized  (IC)  prior 
to  each  run  in  the  series  being  performed. 


Input  Requested  - None.  Control  is  returned  to 
OPTION  when  the  run  series  is  completed  and  all 
output  has  been  printed. 

Example  - 

OPT I ON 

Xn 


JUNE 

20 

1 974 

1 IhE 

10:24: 

7.10 

RUN 

10  MAX 

STARTED  . 

OUTPUT  BELOW 

MULTI 

TOTAL 

STR4..(  1) 

BETAnXi  1 ) 

BETDMXf  1 ) 

CUVRATI 

1 

1 0 

20.0 

0.074E-02 

0.237E-01 

0.11  1 

1 1 

JO.O 

0.1 41 E-01 

0.46:;>E-01 

0.209 

3 

1 2 

04 . 0 

0.2::V4E--01 

O.oJIiJE-OI 

0 . 306 

4 

1 3 

112. 

0.41 6E-01 

0.903E--01 

0.394 

IC  (Initialize  Simulation^  DO  NOT  Execute) 


Purpose  - Resets  variables  back  to  their  initial 
conditions.  Sets  potentiometers  and  DAC's,  then 
returns  control  to  OPTION. 


Internal  Input  Requested  - None. 


Example  - 

OPT  ION 
■H  ¥:¥.  ■)(■  I C: 
npT ION 
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F (Alter  or  Read  Real  Variables) 


Purpose  -*  Read  current  values  of  parameters,  initial 
conditions,  and  variables  which  are  declared  "REAL"  to 
Fortran.  Alter  current  values  of  "REAL"  parameters 
and  initial  conditions. 


Input  Requested  - Interactive  variable  only  for 
readout,  interactive  variable  followed  by  new  value 
for  altering  data. 


Variation  - Array  Readout:  (a)  Interactive  variable 

followed  by  range  of  array  to  be  output,  (b)  inter- 
active variable  followed  by  the  letters  AM,  allows 
addressing  array  elements  by  number. 


Examples  - 


opt;i:  oh 

■ttii-HK-  F 

ENTER 

oHHHi  yi-ilPNO 


e.o 

VHTPNO  5. 

fr;i;  i 4 


1 > 

1 073. 

'? 

1073.. 

3::::::::) 

(•?  87.7 

4--> 

887 . 7 

PRM  2a:;V  287 

2 a IT  > 

3.900 

286-“-  > 

0 . 0 

287-- > 

1 .000 

PRH  1 23 

i > 

12.33 

2-::i:  > 

0.5100 

3:::::=::> 

0.8200 

4.::::::) 

11.30 

1 i .30 

6::::::::) 

49.30 

88.70 

59.80 

6i . ao 

i 0::::..) 

47.00 

1 1 --  > 

3758. 

1 2===:===  > 

0.2305E 

0.2333E  05 

i 

530.0 

1 5=--^  > 

550.0 

1 6 > 

0.0 

0.4040E  05 

1 8-"""  > 

40.00 

i 9 

1 05 . 0 

20^^:=^^O 

2.000 

21:::::.:) 

-2.400 

9 ::::  > 

2.1  00 

23^::==:=0 

0.0 
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FRI  ah 

!(■  * -iHi-  I 

1073. 

.;i)  :/i.  :,,■.  .Ji.  2 

i 073 . 

3 

i:>  i::i  / . / 

■'(  X-  ■)>:■  4 

837 . 7 

•HO**  PR  A An 
2f7;) 

3 . y 0 0 

■“■•  •)(•  Vi  4 .4 

If.  * * .if.  2 8 ':• 

4.40  07 

■If.  .jh .)(.  If. 

I (Alter  or  Read  Integer  Variables) 


Purpose  - Read  current  values  of  parameters,  initial 
conditions  and  variables  which  are  declared  INTEGER 
to  Fortran.  Alter  current  values  of  INTEGER  para- 
meters and  initial  conditions. 


Input  Requested  - Interactive  variable  only  for 
readout,  interactive  variable  followed  by  new  value 
for  altering  data. 


Example  - 

OP  r 1 ON 
■‘•:-  * * * 1 
PNTER 

****  I POT 
283 

■!<:  * * * 
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DACA  (Alter  DAC  Array) 


Purpose  - To  change  DAC  variable  assignment  and/or 
scaling . 

Inputs  Requested 

1)  "ENTER  DAC  NUM  OR  NAME" 

(a)  Purpose  - To  select  DAC  to  be  altered. 

(b)  Input  Requested  - The  name  of  any  inter- 
active variable  that  is  assigned  to  a DAC 
or  a number  1-48, 

2)  "ENTER  NAME" 

(a)  Purpose  - To  reassign  a new  variable  to 
the  DAC. 

(b)  Input  Requested  - Any  interactive  variable. 
Depressing  the  carriage  return  will  retain 
the  old  assignment. 

3)  "SCALE  FACTOR" 

(a)  Purpose  - To  enter  scale  factor. 

(b)  Input  Requested  - Any  number. 
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Example  - 

OPT  I Oi  J 
•iV'ji'ji?* *  DA  Cm 

lU  RPTUPN  i'u  GPTIUN.S  liri  CR 
ICNTER  DAC  ARRAY  NUM  OR  RAMP 

.;,f.  ■)(.  j,;.  .j(. 

DACO  ( 1 ) - i.UlJT . . i 1)  /'■  1 .0000 

ROYiPR  NAOP 
)i:  -ii'  « ii-  A Y i"i  A X 
YCAL.P  FAM  i OR 

-j 

ii  iYTPR  DAC  array  f*UM  OR  NAnE 

)(■  -it:  -)l; 

Mp I ION 

ADCA  (Alter  ADC  Array) 


Identical  to  DAC  routine  with  the  exception  that 
the  interactive  variable  is  assigned  to  an  ADC  not 
a DAC  and  the  number  must  be  1 - 28 


Example  - 


OPTION 

* * * * ]j  i..,'.  A 

i O RETURN  iO  OP  1 1 ONE  j iJ  i pp 
i:-N  I ER  ppC  arra  y NUO  or  NpOE 
20 

NUAN2.  I ! i ::::  ADCOl  20  i 
ENTER  NAME 

MO  2i  ] p;i  , 2) 

EC ALE  EAC i UR 
■)<: 

l.:.N  i l::,R  MU':.  APR  AY  NUM  OR  NAME 

')<:  i(-  ■)<:  V: 


1 . 0000 


MULTI  (Multiple  Runs) 


Purpose  - To  automatically  execute  a series  of  runs. 
Parameters  (interactive  variables)  may  be  incremented 
from  run  to  run  by  this  routine.  Parameters  retain 
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their  incremented  value  at  the  end  of  the  multiple 
run. 

Inputs  Requested  - 

1)  "NUMBER  OF  LOOPS,  VARS" 

(a)  Purpose  - To  specify  the  total  number  of 
runs  to  be  made  and  the  number  of  inter- 
active variables  to  be  incremented. 

(b)  Input  Requested  - LOOPS,  a number  less 
than  100;  VARS,  a number  less  than  50. 

2)  "VAR" 

(a)  Purpose  - To  specify  the  interactive 
variables  to  be  incremented.  The 
variables  are  incremented  at  the  end  of 
each  run  in  the  multi-loop.  If  a zero 

is  entered,  control  is  returned  to  OPTION. 

(b)  Input  Requested  - Any  interactive  variable. 

3)  "LOOP,  VAL,  INC" 

(a)  Purpose  - To  specify  the  run  number,  initial 
value,  and  increment  per  run. 

(b)  Input  Requested  - A value  can  be  specified 
for  each  run  with  a zero  increment  or  a 
series  can  be  setup  by  the  input  of  an  in-^ 
crement.  The  incrementing  is  halted  at 
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each  new  LOOP  input  or  when  runs  equal  to 
the  total  number  of  LOOPS  have  completed. 


Example  - 

nF'TIGN 

MULTI 

NUM  OF  LOOPS /VARS 
12  2 

VAR 

V:  -R-  ii-  S I I'i:  4 
LOOP/VAL/ INC 

i 20.  20. 

7 20.  20. 

•>(. 

V A R' 

UIN 

LOOP /VAL/ INC 

1 Q . 0^ 

•OXrji:*  7 00. 

•)(•  * * w 7 60.  0 . 

■}l-  ■>>:■  ii- 

OPT ION 


TEST  (Test  Run  or  Abend) 

Purpose  - To  run  the  problem  without  real-time  serv- 
ice or  produce  an  abnormal  termination,  thus  giving 
a program  dump. 

Input  Requested 

1)  "ENTER:  RTIME,  NO  RTIME , ABEND” 

(a)  Purpose  - To  indicate  that  a command  is 
desired . 

(b)  Input  Requested  - One  of  three  commands: 
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(1)  No  RTIME  - This  will  remove  the  real- 
time calls. 


(2)  RTIME  - This  will  replace  the  real- 
time calls. 


(3)  ABEND  - Will  produce  a program  dump. 


Example  - 


UPT  ;i:  GN 

TE:>T 

i;;;  n 1 1;:;  R : i a i :i:  m e ^ n g r t ;i;  m e v a b i:;:  n d 

RTIME 


MES  (Send  Message  to  Line  Printer) 

Purpose  - To  send  a message  to  the  line  printer 
that  will  document  analog  programming  changes 
(experimental  or  permanent) , indicate  the  state  of 
analog  computer,  or  log  simulation  information. 

Inputs  Requested  - A message  that  is  less  than  80 
characters  long  per  line. 

Example  - 


OPTION 

MES 

TG  RETURN  TG  OPTIONS  HIT  CR  TWICE 
THIS  OPTION  IS  USEEUE  EOR 
DOCUMENT  I NO  SIMULATION  RUNNING 
AND  KEEPING  SIMULATION  NOTES 
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TABLE  (Tabular  Output) 


Purpose  - To  output  data  for  a series  of  runs  in 
a tabular  form.  Designed  for  use  in  the  multi-run 
cases.  This  routine  automatically  is  called  when- 
ever a multi-run  case  is  in  affect,  unless  it  is 
deselected . 

Input  Requested  - Up  to  nine  interactive  variables. 


Example  - 


OPTION 
■K-KHH-  TABLE 
UNI T NODE 


ENTER  UP  TO  9 NAME^ 

STR4  BETAMX  BETDMX 

■it  it  if 


CUVRAT 


TRACK  (Track  Real-Time  Variables) 


Purpose  - To  collect  and  output  simulation  data  as 
a function  of  time. 

Input  Requested  - 

"TIME  ON,  OFF,  STEP,  VARIABLES" 

1)  TIME  ON 

(a)  Purpose  - To  state  the  time  in  seconds 
that  the  routine  will  turn  on. 
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(b)  Input  Requested  - Any  positive  number. 


2)  TIME  OFF 

(a)  Purpose  - To  state  the  time  in  seconds 
that  the  routine  will  turn  off. 

(b)  Input  Requested  - Any  positive  number  ^ 

TIME  ON. 

3)  TIME  STEP 

(a)  Purpose  - To  state  the  time  between  samples. 
If  this  sample  interval  is  too  small,  the 
program  will  automatically  compensate  for  it. 

(b)  Input  Requested  - Any  positive  number. 

4)  VARIABLES 

(a)  Purpose  - To  enter  the  interactive  vari- 
ables to  be  tracked.  Entering  the  word 
Retain  will  retain  the  previous  variable 
list. 

(b)  Input  Requested  - Up  to  50  variables. 
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Example 


opt;i;  on 

■II;  •)!;  I I'C  (••I  (,:  |\, 

MNI T iNODE 
•)i  -)ooi-*  T A 

ENTER  TIME  ON/OEEySTEP 


)(■  ¥:  ¥ ¥ 

. I:>  1.1 

...  1 

TYPE 

RETAIN 

OR 

ENTER  NEW  ARRAY 

■If.  .)i, ^ 

PS  IDT 

PH IDT  PHI  ZIMX(I)  ZIMX(3) 

¥¥¥¥ 

IME 

PS1DT.(  1) 

PH  IDT. ( 

1 ) 

PHI...(  1) 

ZIMX. . ( 1 ) 

ZIMX. . ( 

G.!)G 

G . 43G77 

G.775V7E-02 

0.11 728 

0.29986E-01 

0.10125 

G.6G 

0.35703 

G . 2V683 

-0.1 0414 

0.29986E-01 

0.10125 

0.7G 

G.2A50A 

0.49151 

•-0.59047E-01 

0.29986E  -01 

0.10125 

G.HO 

G. 20740 

0.32454 

-G.1642&E-01 

0.29986E~G1 

0.10125 

G.9G 

G. 30 123 

0. 14344E-G2 

-G.12279E  -03 

0.29986E-01 

0.10125 

1 .GO 

0.28316 

-0 . 1 4820 

-G.90558E-02 

0.29986E-01 

0.10125 

1 . 1G 

G.2VG48 

-0.38197 

-0.3031 4E-01 

0.29986E-01 

0.10125 

3 ) 


OFT [ON 


LA  (List  Array  Values) 


Purpose  - To  output  the  values  of  variables  which 
are  array  members. 


Input  Requested  - Any  Interactive  Variable  which 
is  an  array  followed  by  the  range  of  the  array 
desired. 


Example  - 

OP  I ION 

LA 

UN IT. MODE 

r XEO 

ENTER  NAME / INDEX1 / INDEX2 
FRl  1 4 
FSI  1 4 
PRM  11  14 
PARAM  11  14 


f h l 

1==> 

1073. 

2==> 

1073. 

3=|==> 

887.7 

4==> 

887.7 

FSI 

1 =:=) 

-10.51 

2-=> 

10.51 

3==> 

0.0 

4==> 

0.0 

PRM 

1 1==> 

3832 . 

1 2==|> 

0.2400E 

05 

13==  > 

0.2431E 

05 

14==> 

530.0 

PARAM . . , 
1 1==> 

3832. 

1 2==> 

G.2400E 

05 

13==  > 

0.2431E 

05 

14==> 

530.0 
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REMOVE  (Suspend  Output) 


Purpose  - To  cancel  the  execution  of  a selected 
Interactive  Subroutine. 


Input  Requested  - Any  Interactive  Subroutine  name. 

Example  - 

iJPT  1 ON 

,j(.  -ji}  u:  ■')<:  K'  I;;.  M i.)  V I'.'.. 

WHAT 

•)t  K -X  * T|-'N"tCl\ 


The  following  routines  have  no  inputs.  Output  is 
directed  to  the  CRT. 


T+D  (Time  + Date) 


Purpose  - To  display  the  time  and  date. 

Example  - 

OPTION 

•)(•  X -K-  X T f D 

UN IT ^ MODE 

•Kxxx  T XEQ 

JUNE  21  1974 

1 1 ME  1 4 : 30  : 40  67 


STD  (Standard  Output) 

Purpose  - Select  standard  end  of  run  data. 
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Example 


or  1 1 ON 

:;ti> 

UNIT  .riODE 
• 1 XE& 

r^XAV=  u.G  DECL  TIME=  3.0  AVCUR=  G.O  BTDMAX=  0.0  BTMAX=  0.0  DELBI^  3.0 
ArMAX=  0.000  F'H1MAX=  0.0  RMAX=  0.0  LANE  CHNG  DEL=  0.0  DELF'SI=  0.0  MAX  5TEER=  0.0 
F Tr.’anAX=  0.0  R1RQhAX=  0.0 


DUMP  (Dump  Data  List) 


Purpose  - To  display  the  value  of  each  interactive 
variable  at  the  time  the  dump  is  selected  to  execute. 

Example  - 


Ul  1 1 UM 

)Fx»x  Dl.ItU' 

UNI  1 

K FF  X # 1 

XEN 

0.0 

DEL1 

0.0 

AFU  . . 

0. 19A2E-01 

DEL21)A=^= 

0,0 

AF A.  . .= 

1 .000 

DEL  2 1)1== 

0.0 

AIXIIR.=» 

3720. 

l)El.3I)A  = 

0.0 

AIXP. 

1 69 . A 

I)EI.3I)T== 

0.0 

AlXZEiN  = 

1 77.^' 

i)u;.v . 

- . 0000 

A[X7P.= 

-352.5 

I)l  YTE^.=•• 

- .2453I-  - 'y-l 

AIYBR.= 

0.2322E  05 

1)5'UMAX- 

0.0 

AIYP.  .= 

169.0 

D I == 

0 . 1 oo':'L-  01 

AJ7BR.= 

0.2944E  05 

•1)1..  , .=■= 

0 . 0 . 

AKK 1 . . = 

1 . 000 

1)2.  . . .= 

- 1 . 20? 

AKK2. 

1 .000 

1)3  ....== 

0 . 0 

Al  l 1 . 

-.2262E  ON 

1)4 == 

0 . 1 1 46F.  60 

Al  IN..  ■= 

-46.06 

ETAL. 

-.11 33E-05 

Aii  M . . = 

25.05 

r TAX. 

- . 21 76E- 03 

Ain:?.  .= 

-25.05 

1 XIAB.= 

- . 1 270F.  -56 

AMU I . .= 

0.9657 

l;L  1 == 

0.1156E  09 

AMI  I . 

5.010 

E2 - 

“.4400E  06 

AM2I. .= 

-.2466 

E3 = 

0.1252E  06 

ANGNL.= 

0.1100E  09 

FEiSI  . .= 

G.O 

ANGNL.0= 

0.0392E-04 

FBS2. .= 

G.O 

ANTI1 .= 

1 .734 

FB.S-3.  .= 

0.0 

ANTI2.= 

1 .734 

FE«S4.  .- 

0,0 

ANTI3.= 

-.1425 

FCI . . .= 

G.O 

ANTI4.= 

-.1425 

FCIMAX= 

092.9 

API . . .= 

0.1301 

F I . . . . =•• 

1 .000 

AP2. . .= 

0.1 301 

FOTM . . ==•■ 

-1.210 

0 I M . . . == 

63.20 

S3P...=  -30.00 

P .....  = 

0 . 0 

S4P...=  -30.00 

PARAM.=-- 

0.430 

TE<CR3.=  2.923 

H'F.  . .= 

0.0 

TEhCR4.=  2.923 

PltR  . . . =■ 

0.0 

inSR3.==  1.030 

PI- 1 . . 

-.3097E- 

-03 

IHSR4.--  0.9047 

PI  I . . .== 

1000. 

rFRI)AC=  -.5300E  09 

I II I . . .=■ 

0.0 

TFU2..=  29.90 

PI  1 1 CG  [-= 

- . 5630E 

02 

THE...=  -.1215E-G2 

Pill  DriX  = 

0.0 

■)HEDT.=  0.0 

Pill  01  . - 

0.0 

THEnn=  0.7500 

Pill  1 in-- 

-.3000 

IHEO. -.1215E-02 

PI  PI  ,i; . 

- . 6405E- 

■02 

I HERR. = 0.0 

PH  1 HAX  = 

0.0 

THRD,.=  0.3333 

pHin. .= 

0 . 0 

THS1..=  0.13G9E-01 

pm;Ri).= 

G.O 

IHS2..=  0.1309E-01 

PH  I.RDA= 

0.0 

TTHDHP=  0.0 

PHIRR.= 

G.O 

11M1)EC=  0.0 

PD = 

0.0 

TIME. .-  0.0 

1 'RM . . . = 

0.430 

TIME10=  G.O 

P.S'I . . .= 

0.0 

TXME25=  G.O 

P5:iDT.= 

G.O 

TIMIN5=  G.O 

P.VIFNT  = 

-.2700 

TMAX1 .=  0.9942E  20 

P5:il.  .= 

-. 1550E 

-02 

TMAX2.=  G.1991E  06 

P.SIMAX-= 

0.0 

TMAX3.=  -.4079E-49 

PS 10. .= 

G.O 

TMP. . .=  0.0 

PS I OUT = 

0.0 

TQBF . . = 0.0 
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AP3  . . . 

-.1  42';» 

FRI  . . . 

1047. 

AI-  ’-4  . . . 

-.1 425 

FR  IBR.=:^ 

1 047. 

APP.V1 

•56.79 

FST . . .- 

1 9 . 70 

ARP  ^2.=^^ 

56.97 

FXI  1 . 

0 . 0 

AR 1 . - . 

1 .596 

FXL2. 

0 . 0 

AR2  . . . 

1 .596 

FXBI  . 

■■■■1  . 302 

AR3  . . . 

0.0 

FYUI  . 

-19.70 

AR4  . . . 

0 . 0 

(; 

3B6 . 4 

0 . 0 

Ct'AMT  . . 

0 . 0 

AXI  . . . 

0.0 

RAMI  . 

••■■31 . 1 9 

AY MAX  . - 

0.11  33i;  • 05 

RAM 2. 

15.03 

A 1 ...  . - 

1 .5  40 

RAM3. 

1 5.03 

A 1 2 ...  “^ 

-1543. 

RBI  . . 

-.  1 V49E-- 

A 2 

1545. 

RETDL 

0.0 

A 21  ... - 

1 900. 

(Ei: 

- . 1 Bi:i2E- 

BAM  I . 

0.2221 E-02 

RP1  . . 

0.2B64E 

BPTAI 

0.1550E-02 

RP2.  . . 

2202 . 

IiETAMX-= 

0.0 

RR1  . . . - 

(.)  o ^ 

BETDMX^^= 

0.0 

RR2  ...=•-•= 

0.3B1 IE 

BEilBR^^^^ 

1 962E -01 

RV1  . . 

0.44B0E 

BETIP.:^ 

0.6625E-03 

RV2.  . 

0. 1252E 

BMPN . . ~ 

0.0 

I AX. . 

0.51 4BE 

BMPS . . 

0.0 

:n)ACK.=^^ 

0.0 

BRKOFF- 

1 .020 

IEN1)R.== 

- 1 4.24 

BRKON . 

0.5200 

lERDAO: 

-14.24 

BSL(DPE= 

0.5000E-01 

IN 

-.201 4E- 

BTV.  . 

0.0 

INA.  . 

0.2523E 

BTVDT . - 

•■.4975E-06 

I OR.  . .== 

0.B236E- 

C:A20. 

0.6B42E  07 

I OUT.  .= 

0.7B92E- 

CA23 . . = 

3293. 

loin  A.=^^ 

0.2031 E 

CIP.  . .== 

4105. 

I POT. 

0.1 524E- 

Cl  VP.  .== 

2046. 

IPOTAI)^^^ 

0, 1524E  •■■■ 

COSPSI= 

1 . 000 

IPRT.  .=^ 

0.0 

CP.S'R3 . --■= 

1 .000 

1SW1  . 

0 . 0 

CP,S'R4 . = 

1 .000 

1SW7. 

0.0 

(::URTBP== 

0.0 

I IMP.  .:= 

0.7B92E- 

CURVAV:--:-- 

0.0 

IVHTP.= 

0.30B9E- 

CUVRAT^^ 

0 . 0 

.J..)TIME^^-: 

0 . 0 

CVI . . .= 

50.00 

•JUMP . . =:= 

0.0 

DACO. .= 

0 . 7tt92E-04 

MOP ... - 

0.B563 

DEI = 

0.0 

NCAM . . = 

G.5432E 

DELBET:= 

0.0 

NCAS . . 

- .741  BE- 

DELFW1 

0.0 

NFA.  . .-■ 

0.51 4BE- 

DELFW2- 

0.0 

NTF  ...=•• 

0.103GE- 

DELPHI= 

-.7662E  55 

NTR.  . 

0.1030E- 

DEEPS  ]> 

0 . 0 

N1 ^ 

0. 1519E- 

DEESiR= 

G.O 

N2 =•■= 

0.61 26 E- 

DELTA. ^ 

0 . 1 1 1 BE  10 

ONEOA.=^^ 

-• . 64B0E- 

DELTHE== 

- . 1 079E-49 

ONEOD.=^: 

0.B947E- 

DELI  DA-= 

0.0 

ONER . . 

-.5653E- 

OPTION 


PSIRR.^^'^ 

0 . 0 

TNBR. 

0 . 0 

PSI3S.==^^ 

0.0 

1 NFMAX^^^ 

0.0 

PSI4S.=^: 

0 . 0 

IRRMAX^^^' 

0 . 0 

PSI5. 

0.0 

TRCR3.=^= 

1.315 

r'SR3 . . === 

0 . 0 

TRCR4.^---= 

1.31  5 

PSR4 . . 

0 . 0 

TR02. 

30 . 90 

(■1 ....  . “■ 

0 . 0 

1RSR3.:==: 

0.4669 

RDT.  . 

0.5060E  01 

I RSR4.- 

0.4069 

NO 

0 . 0 

ISN2. 

23.50 

NUAN1 

0.0 

TSTEP.^- 

0 . 1 OOOE 

NUAN2.---^^ 

0.0 

IUIN7.  . - 

0.3704L 

(:B)AN3  . 

0.0 

11.....=::: 

BBO  . 0 

NIImN4.:^:^ 

0.0 

UD  r . . . ::: 

• . B422E 

R' . . . . . - 

0 . 0 

UR:I  . . . : :: 

BBO . 0 

RI)  1 . . 

.23B0E-05 

IIRIP.  .:::: 

BBO . 0 

RMAX. 

0 . 0 

U I . . . . :::: 

BBO . 0 

RHI  . . .=: 

1011. 

U ;i:  N . . . :::: 

50 . 00 

RO - 

0.0 

DO  ....== 

BbO  . 0 

RO  IM. 

0 . 0 

UOUT  . 

BBO . 0 

ROUT. 

0.0 

UOI 

0.B966 

RTAB. 

•.B457E-53 

U 11...  =: 

0.6500 

RWZI  . 

0.7219 

U 1 

0 . 0 

R ZF  . . . •'-^ 

24 . 50 

U2P == 

0 . 0 

RZR  . . . ^^ 

24.50 

U3P.  . 

0 . 0 

SAITN.^^^ 

0.0 

U4P  ...=■-• 

0 . 0 

SAMI . 

0.1 272 

V 

0.0 

SCR3. 

0 . 355 1 

VDT.  . .=: 

-.4B44E 

SCR  4. 

0.3095 

VRI  ...=:: 

0 . 0 

SPIN. 

-100.0 

VHTPNQ:::: 

6.000 

SF OUT . 

1 . 000 

VI 

0 . 0 

SFXU. 

- 4.643 

VC) 

0 . 0 

SF  YU. 

0 . 0 

VOUT . . 

0 . 0 

SINPSI=^^ 

- . 1 55BE - 02 

U =: 

0.0 

SL IPI 

0.0 

WCTHI .= 

- .7B69 

SM ■-■=^ 

9.760 

WC I U2  . - 

- . 97B2 

SN ■•^= 

0 . 0 

UDT  . . .- 

1 B . 5 1 

SNI , . 

1 .000 

U i: 

0 . 0 

SNPHIU=^^ 

-1 .21B 

WC) :::: 

0.0 

SNPSIU=-- 

0.0 

WSTH1 

0.6163 

SNI  1 lElF-^: 

1 1 66 . 

WSTH2 . == 

0 . 2056 

SPSR3.- 

0.3551 

X == 

0 . 0 

SPSR4  . 

0 . 3095 

XD  T , . . ---■ 

BBO.O 

STR1  . 

0.0 

XC) - 

0.0 

STR2. .- 

0 . 0 

Y 

0 . 0 

STR3 . . = 

0 . 0 

YDT.  . .=: 

0 . 0 

STR4. 

0 . 0 

YO - 

G.O 

STR5. 

223 . 4 

z - 

-23 . B4 

STR6. 

223.4 

ZDT  . . .=: 

1 .069 

S 1 1"' . . . ^^ 

■40 . 00 

Z J :::: 

-1 2.4B 

S2f  ' . . . 

-40.00 

ZIMX.  .=:■ 

0.7219 

01 

01 

06 

05 

06 

06 

04 

02 

09 

03 

04 

30 

01 

01 

04 

03 

09 

67 

03 

03 

03 

01 

02 

03 

09 

09 
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DACL  (DAC  List) 


A 


Purpose  - To  list  the  DAC  assignments  and  scale 
factors . 


Example  - 


ni  ' I 1 1 IN 

DA  Cl., 


1 IN  1 1 / hODf- 
■IlifHX  1 XCN 

1)A<  0(  1 ) 

r::- 

1 IIIH  . 

Di'iHK  I'l 

::d 

1 om  . 

DAcul  :n 

I om  . 

1)A(U(  4) 

j iiij  1 . 

DACfK  5 1 

cciin  . 

DACOI  A) 

■i;: 

1 om  . 

DACLK  /) 

com  . 

DAC(M  H) 

com  . 

DACCH  VI 

com  • 

I)A(:0(  1 0 ) 

com  . 

DACCM  1 1 I 

T 01 1 1 . 

DAco  ( 1 ) 

in; 

.uim . 

I)ACO(  1 3 ) 

= 

:iciur. 

DACOl 1 A I 

::n 

Him  . 

DACni  1 5 I 

Tom . 

DACO ( 1 A 1 

lOl.H  . 

DACm  1 7 I 

= 

I OUT. 

DACCH  C Cl  1 

j:  out. 

DACOl  1 9 1 

sn 

lOUT. 

DACOl 20 1 

I OUT. 

DACO 121 1 

I OU  T . 

DACOl 22  I 

=; 

TOUT. 

DACOl  2:i  I 

I OUT. 

DACOl 24 ) 

I OUT  . 

DACOl 25 ) 

= 

I OUT. 

DACOl 26 1 

I OUT. 

DACOl 27 1 

= 

locn . 

DACCH  20  1 

I OUT. 

DACOl 29  I 

= 

I OUT. 

DACCH  30 ) 

nr 

TOUT. 

DACOl 31  ) 

nr 

TOUT. 

DACOl 32 1 

r= 

TOUT. 

DACCH  33) 

r= 

TOUT. 

DACCH  34  I 

TOUT. 

DACOl 35  I 

= 

TOUT. 

DACOl 36  I 

=r 

TOUT. 

DACOl 37  I 

rr 

TOUT. 

DACO 1 30  ) 

= 

ANTT.1 

DACOl 39 ) 

= 

AN  I 12 

DACOl 40  I 

rr 

ANTI3 

DACOl 41  ) 

= 

ANT  1 4 

DACOl 42  I 

ETAX. 

DACOl 43 ) 

= 

ETAL. 

DACOl 44  I 

ROUT  . 

DACOl 45  I 

= 

uom . 

DACOl 46 ) 

rr 

VOUT. 

DACOl 47  I 

=: 

E*T  V.  . 

DACOl 40 ) 

= 

ONER . 

1 1/ 

1 . 0000 

2 1 

1 . 0000 

3 I / 

1 . 0000 

4 1/ 

1.0000 

5 )/ 

1 .0000 

6 1/ 

1 .0000 

7 I / 

1 . 0000 

0 1/ 

1 .0000 

9 1/ 

1 .0000 

101/ 

1 .0000 

111/ 

1 . 0000 

12)7 

1 . 0000 

131/ 

1 .0000 

14  1/ 

1 .0000 

15)7 

1 .0000 

16  1/ 

1 .0000 

17  1/ 

1 .0000 

10  1/ 

1 .0000 

19  1/ 

1 .0000 

20  1/ 

1 .0000 

32  1/ 

1 .0000 

31  )/ 

1 . 0000 

23  I / 

1 .0000 

29  )/ 

1 .0000 

25  I / 

1 .0000 

26  ) / 

1 . 0000 

271/ 

1 . 0000 

2(1 1 / 

1 .0000 

24  1/ 

1 .0000 

30)/ 

1 .0000 

22  )/ 

1 .0000 

21  )/ 

1 .0000 

33  ) / 

1 .0000 

34  )/ 

1 .0000 

35  )/ 

1 . 0000 

361/ 

1 .0000 

37)/ 

1 .0000 

1 )/ 

10000. 

1 )/ 

10000. 

1 )/ 

10000. 

1 )/ 

10000. 

1 )/ 

1 .4000 

1 )/ 

1 .4000 

1 )/ 

1 .0000 

1 )/ 

1 200.0 

1 )/ 

1200.0 

1 )/ 

3.1 400 

1 )/ 

0. 41 7G0E 
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ADCL  (ADC  List) 


Purpose  - To  list  the  ADC  assignment  and  scale  factors. 
Example  ~ 


uPT 1 UN 

h}  ¥ ■)i,-  N D C 

liNT  r .HiODE 
ji;  T X 

I... 

EQ 

DEL1 DT( 

i ) 

A D C A ( 1 ) ■>(• 

■ i 00.00 

PEL  2 DTI 

1 ) 

ADCOi  2)3  , 

■■■■1  00.00 

DEL-EDT  ( 

1 i 

ADCOi  3)3 

•••■1  00.00 

DEE  1 DAI 

1 ) 

ADCOi  4)3 

10.000 

DEi...2DA( 

1 ) 

ADCOi  D)* 

1 0 . 000 

DEL3DA( 

1 ) 

ADCOi  6)3 

1 0 . 000 

PHIRD.  ( 

i ) 

;;;; 

ADCOi  7)3 

1 . 0000 

T'H  1 RDA( 

1 ) 

ADCOi  6)3 

0.25000 

DELFW1 ( 

1 ) 

ADCOi  9)3 

0 . !;>  0 0 0 0 

DELEW2i 

-i  ) 

ADCO i ) 0 ) 3 

0 . 50000 

! i 1 r‘ . . . i; 

1 ) 

ADCOi 11)3 

2 . 0000 

U2R.  . . f 

i i 

r; 

ADCO i 1 2 ) 3 

2 . 0000 

I I3P.  . . ( 

1 ) 

ADCO i 1 3 ) 3 

2 . 0000 

IJ4P.  . . i 

■i  ) 

ADCO i 1 4 ) 3 

2 . 0000 

,X  i F''  . . ( 

1 i 

ADCOi 1 A ) 3 

1 000 . 0 

P2P . . . i 

1 ) 

ADCO i 1 6 ) 3 

1 Ooc  0 

1 

i ) 

:::: 

ADCO i 1 7 ) 3 

1 i.  M Ji.-.'  , 0 

E4P.  . . i 

•!  ) 

ADCO i 1 6 ) 3 

1 1.)  1.1 1.1 . 0 

PUANi . ( 

1 ) 

:::: 

ADCO i 1 9 ) 3 

1 ...uc'OO 

QUAN2  . ( 

1 ) 

ADCOi 20  ) 3 

1 .0000 

QUAN3. ( 

1 ) 

:::: 

ADCO i 21  ) 3 

1 .0000 

(:ji.)AN4 . i 

1 i 

:::: 

ADCO i 22  ) 3 

1 .0000 

APPEi . i 

1 ) 

:::• 

ADCOi 23  ) 3 

100.00 

APPE2.  i 

i i 

ADCOi 24  ) 3 

1 00 . 00 

WETH1 . 1 

i ) 

:::: 

ADCOi 25  ) 3 

1 . 0000 

ytXl  Hi  . ( 

1 ;i 

ADCOi 26  ) 3 

1 .0000 

WE T H2.  i 

i ) 

ADCOi 27  ) 3 

1 .0000 

WC  1 H2.  ( 
OPT  :i;gn 

1 ) 

:::: 

ADCOi 26  ) 3 

1 . 0000 
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TERM  (Terminate  Program) 


Purpose  - To  terminate  program. 


Example  - 


OPT  ;i:  UN 
jiUf-io-w  TERM 
JUNE  21  1974 

II  ME  17:  :;V:3a.72 
PROGRAM  TERMINATED 


If  the  OPTION  cue  detects  an  error  or  an  error  is  forced 
by  user,  the  active  Subroutines  can  be  determined  by  the  input 
of  a question  mark  (?) . 


Example  - 


OPTION 


■)(•*** 


ERROR 


OPTION  NOT  FOUND 


TO  XEQ.  PROGRAM 
TO  TERMINATE  PROGRAM 
FOR  MULTIPLE  RUN.S 
FOR  TES'T  RUN  OR  ABEND 
70  ALTER  DAC  ARRAY 
70  ALTER  ADC  ARRAY 
TO  SET  IC  ONLY 
70  SEND  MESSAGE  TO  IP 


TYPE  X 
TYPE  TERM 
TYPE  MULTI 
TYPE  TEST 
TYPE  DACA 
TYPE.  ADC  A 
TYPE  IC 
TYPE  MES 


FOR  TIME  AND  DATE  TYPE 
TO  DUMP  DATA  LIST  TYPE 
FOR  STANDARD  OUTPUT  TYPE 
TO  TRACK  REAL  TIME  VARIABLES  TYPE 
FOR  TABULAR  OUTPUT  TYPE 
TO  LIST  DAC  ARRAY  TYPE 
70  LIST  ADC  ARRAY  TYPE 


TfD 

DUMP 

STD 

TRACK 

TABLE. 

DACL 

AD  CL 
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APPENDIX  E 
SIMULATION  DATA 

1.  PRESENTED  HERE  IS  THE  LISTING  OF 
THREE  INPUT  DATA  DECKS 

FOUR-WHEELED  INDEPENDENT  SUSPENSION 
VOLKSWAGEN  CAMPMOBILE 


385 


t-Ti* 


f?!HT:^-. , 

|r'‘*..ifi 


■■■'•■■  ■ „-,Sf 

, ' ,(,  ' If?'*  iifm  ' fli- !■»• 

*.*'”-iV  ■ 

'.  orj 

.^w  , 


.A?' ■ *<i"«r- 


HMtk 


■4  X 

..  ,„v’  -& i#  MXSf'  V 


r'l^'  ■* 


' 


3»t'a:a<:>M«3S5Ct5>  -r  ■■; 

•v;'  5 


Qie  CARNEW  VW  VAN 

DEIFW1  DELFW2  PSII(1)  PSII(2)  PSII(3)  PSII(4) 
DEL2CA  PHIRDA 
X Y SFXS  SFY5 
SFZ3  SNPHIS  SNTRES  SNP3IS 
BETAI  O)  BETAI(2)  BFTAT{3)  BETAI(4) 

BETTP(I)  BETIP{2)  nETIP(l)  BETIP(4) 

FRI  (1)  FRJ  (2)  FRT  ( 3)  FRT  (4) 

?X0I(1)  Fxni  (2)  Fxni(  3)  FX'JT.(4) 

FST(1)  FSI{2)  FBI  (3)  FBI  (4) 

FYUI{1)  FY0I(2)  FYIJI(3)  FY(ir(4) 

STAX  FTAT,  BTV  R 
P PHI 


PFL  AXAVK  TIND.EC  AYMAT  SLIPI(I)  SLTPI(2)  nLIPI{3)  SLIP!  (4) 

PFI.  AXAVr  AYMAX  PETDMX  CUVRAT  SLTPI(I)  SLIPI(2)  3LTPT(3)  SLTPI(4) 
RMPN  nNPS  AYflAX  RMAX  CUVKAT  BSTDtlX 
BTRU  FSTAFX  FFTP'^X  CUVRAT  AYMAX  PWAX  PHINAX 


NOTUSFD(  1) 
ANTI1  10000 


MAIN  n c 

FAT  N BT. 
MAIM  (-L 


3TR5  AYMAX  DPT  P'^TAMX  DETPSI 

UT  N 

MAIM 

qr 

PH1*'|AX  PHirrTX  PMAX  ?,Ifn  (1)  ZIMX  (2)  7,TMX{3)  ZTMX('i)  UTM  BRKOFF 

MAT  N 

PFI  AXAVF:  AYflAX  BF.'DMX  CUVRAT 

SIIPT(I)  SLIPI(2)  3LrPI{3)  B[,IPl{4) 

MAT  N 

10  0 

TOnT(-1)  1C  000. 

« A T N 

1 10 

I OUT  1 02)  10. 

MAT  N 

120 

ronT(03)  IC'^00. 

MAIN 

1 30 

I0UT(C4)  10. 

MAIN 

1UO 

TOir^r^B)  1(0. 

MAI  N 

150 

TOUT  (Of,)  1C  000. 

MAIN 

1 (:.  0. 

lOUT  (07)  100  . 

MAT  N 

170 

TOUT  {(08)  10000. 

IOUT(09)  4C0C0. 

MAIN 

190 

TOUT(IO)  40000. 

MAI  N 

200 

NOTUSFr(l)  1.0 

MATH 

27C 

NOTUSED(I)  1. 

TOUT  (13)  ICO. 

MAI  N 

230 

I()UT(14)  100C0. 

MAIN 

24G 

I OUT  (15)  100. 

MAI  N 

250 

lOUT(IO)  10000. 

TOUT  (11)  10. 

MAI  N 

210 

TOUT  (18)  10. 

MAI  N 

290 

NOT  OS  ED  (1)  1.0 

" 

MAIN 

290 

TOUT  (20)  10. 

MAI  N 

30C 

TOOT  (21)  -20. 

IOUT(22)  -20. 

TOUT(23)  -20  . 

IOUT(24)  -20. 

UGIP(  1)  1500. 

MAIN 

350 

UG1P(2)  1500. 

f 

MAI  N 

35 

UGIP(3)  1500. 

MAI  N 

370 

NOTUSFD(I)  1.0 

MAIN 

380 

DGIP(4)  1500. 

MAI  N 

39C 

NOTUSED(I)  1.0 

MAI  N 

400 

NOTUSED(1)  1.0 

MAIN 

410 

NOTtlSED(l)  1.0 

MAI  N 

420 

IOUT(33)  -2. 

MAIN 

43C 

TOUT  (34)  -2. 

MAIN 

440 

TOUT  (3  5)  -2. 

MAIN 

45  0 

IOUT(36)  -2. 

MAI  N 

460 

387 


MAIN  480 


ANTI2  10000. 

nAIN 

49C 

ANTI3  10000. 

MAIN 

•=co 

ANTI4  10000. 

HAI  N 

5 1C 

ETAX  1.4 

MAIN 

52C 

ETAL  1.4 

MAI  N 

5 30 

R 1 .C 

II  1200. 

VOIIT  1200. 

HAI  N 

560 

BTV  . 35 

RTVDT  .4 

ENDNO  EAC 

MAIN 

590 

DELICT  -1C0. 

MAIN 

6CC 

DEL2DT  -100. 

DELSCT  -ICO. 

MAIN 

62G 

DELIDA  10. 

MAI  N 

53C 

DEL2DA  10. 

DEL3CA  10. 

MAI  N 

65C 

PHIP  C - 100  . 

PHI BD A 10. 

DELFW  1 -0. 

MAIN 

68C 

DELE V 2 -0.5 

MAIN 

690 

in  r 2 . 

MAI  N 

700 

ri2P  2. 

MAIN 

"MC 

U3P  2. 

MAI  N 

720 

II  4 P 2 . 

MAIN 

7 3C 

S1F  2000. 

S2P  20C0. 

S3F  2 '^00. 

S4F  2000. 

QIIANI  1. 

MAI  N 

700 

QIJAN2  1. 

MAIN 

79C 

QUAN3  1. 

HAI  N 

8CC 

QIJAN4  1. 

MAIN 

ARPS3  100. 

HATH 

820 

ARPS4  100. 

MAIN 

930 

RWZIA  -2. 

PWZ2A  -2. 

RWZ3A  -2. 

RWZ4A  -2. 

ENDNO  A DC 

MAIN 

88C 

MAIN 

890 

INDXCN  40C0 

MAIN 

900 

VEHICLE  flODSl  * VW  CAHPMCEILB  1973 

0.9509U01  .06331873  .04225659  .04367653  .01231053  .0010975920.0 
2.757724  -.1297874  - . 0 3 04 593 1- . 0 0 64 946 2- .00 04956 1 , 000023590C . 0 
-.07321143- .03634039- .0 1 556503- . 00756 95 7- .00 16025 1 000 129640 .0 
-1  .010893  . 7207570  -. 00 40 1940 . 00 455 590 3- .000426 66- . 00 0099750 . 0 
O.C  C.C  0.0  0.0  0.0  0.0  0.0 
-.  C50 5801 3-. 065854 6 1-.0 2 369034-. 00 15 6075.00099 5467. 00025812 00.0 


O.G 

C .0 

TABLE 

I ♦ BRAKE  TORQUE 

FUNCTION 

10C0. 
99999  . 

8900. 

MAIN1C20 

0.0 

0.0 

TABLE 

II  * ERAKE  TORQUE 

FUNCTION 

10CC. 

8900. 

99999  . 
0 . 0 

0.00 

TABLE  III- 

SIDE  FORCE  SHAPING 

FUNCTION 

MAIN1070 

0.05 

.01 

V 


0.2 

.17 

- 

0.30 

.35 

0.4 

.54 

0.6 

.81 

0.8 

.93 

1 .c 

99999  . 

1 . 

MAIN  1 18C 

0.0 

.49 

SFPO  COEFFICIENTS 

.08727 

0.52 

.1745 

0.56 

. 2618 

0.59 

. 3491 

0.6 

. 4363 

0.58 

.523  6 

0.56 

.8109 

0.52 

.6981 

0.46 

.7854 

0.41 

.8727 

. 31 

1 . 6 

9.0 

3 . ; 4 

0 . 0 

99999  . 

. 

O.G 

o 

O 

.08727 

0 . 28 

.1745 

'0.56 

.26  18 

0.81 

.3491 

1.01 

. 4363 

1.20 

.52  36 

1 .38 

.6109 

1 .59 

.6981 

1.76 

.7854 

2 .01 

.3727 

1.91 

1.6 

0.0 

3.14 

0 .0 

• 

99999  . 

0.0 

0.19 

.08727 

0.21 

.1745 

0.28 

.2618 

0.38 

.3491 

0.5 

- 

. 4363 

0.61 

.5236 

0.73 

.6109 

0.89 

.6981 

1 .01 

.7854 

1 .10 

.8727 

1.15 

, 

i.e 

0.0 

3,14 

0.0 

99999  . 

0.0 

0.0 

.08727 

.052 

.1745 

. 102 

. 2618 

. 141 

.3491 

. 192 

.4363 

.227 

.5236 

,259 

.6109 

. 299 

,6981 

. 338 

; 

.7854 

.382 

\ ■■ 

.8727 

.363 

389 

\ 


1.6  0.0 

3.14  0.0 

99999  . 


0.0 

.052 

.08727 

.059 

. 1745 

.065 

.2618 

.078 

.3491  , 

.091 

. 4363 

.111 

.5236 

. 126 

.6109 

. 126 

.6981 

. 128 

.7854 

. 141 

.8727 

. 123 

1 . 6 

0.0 

3.14 

0.0  , 

99900  , 
0.0 

0.0 

. 08727 

.039 

, 1 7 4 5 

. 08  3 

. 10 

.129 

.3491 

.167 

. 4363 

. 193 

. 5236 

. 20  2 

.6109 

.214 

.6981 

. 221 

. 7854 

.229 

.8727 

. 196 

1.6 

O.C 

3.14 

0.0 

99999  . 
O.C 

0.0 

.08727 

0.0 

.1745 

0 .0 

.26  18 

0.0 

. 3491 

0.0 

. 4363 

0.0 

.5236 

0.0 

.6109 

0.0 

.6981 

0.0 

.7854 

0.0 

.8727 

0.0 

1.6 

0.0 

3.14 

0.0 

99999 . 
- 1 C . C 

-20688.73 

VM 

-5.67 

- 1580.44 

VW 

-4.92 

-908.44 

VH 

-3.74 

-482.46 

VH 

0. 

0. 

.43 

55.47 

V'd 

10. 

9003.42 

VH 

99999  . 
-10. C 

-20688.73 

VH 

-5.67 

- 1580.44 

VH 

-4.92 

-908.44 

VH 

-3.74 

-482.46 

VH 

0. 

0. 

.43 

55.47 

VH 

10. 

9003.42 

VH 

FRONT 

FRONT 

FRONT 

FRONT 

FRONT 

FRONT 

FRONT 

FRONT 

FRONT 

FRONT 

FRONT 

fbont 
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99999  . 

-10.  -16375.09  VW  HE4B 

-4.61  -1466.35  VW  REAR 

-3.54  -980.57  VH  REAR 

-1.57  -334.41  VH  REAR 

0.  0.  VH  REAR 

2.28  435.64  VH  REAR 

10.  8136.16’  VH  REAR 

99999. 

-10.  -16375.09  . VH  REAR 

-4.61  -1466.35  VW  REAR 


-3.54 

-980.57 

VW  REAR 

-1.57 

-334.41 

VW  REAR 

0. 

0. 

VH  REAR 

2.28 

485.64 

VW  REAP 

10. 

8136. 16 

VH  REAR 

99999 

• 

0.0 

0.0 

HIND  PROFILE  DATA 

0. 

0. 

0. 

0 . 

0. 

0. 

99999 

• 

• 

066 

40. 

40. 

40. 

30. 

40. 

45. 

074 

.0. 

0. 

0. 

3C. 

c. 

0. 

076 

5. 

10. 

10. 

5 . 

5.5 

4. 

114 

62. 

0. 

62. 

77. 

0. 

0. 

115 

1. 

0 . 

1 . 

1 . 

1 . 

0. 

116 

.5 

100  . 

.5 

. 5 

.4 

100. 

117 

• 

0 . 

3. 

0 . 

0. 

0. 

118 

3. 

0. 

3. 

0. 

0. 

0. 

121 

300. 

200  . 

200. 

0 . 

0. 

0. 

124 

0. 

0. 

0. 

0. 

0. 

2.5 

125 

C. 

0. 

0. 

0. 

0. 

0. 

126 

0. 

0. 

0. 

0. 

0 . 

1 . 

128 

3. 

1 . 

3. 

4 . 

■2. 

5. 

192 

1 . 

. 1 

. 1 

. 1 

. 1 

. 1 

198 

0. 

0. 

0. 

12. 

0. 

0. 

199 

0. 

0. 

0. 

57.6 

c. 

0. 

201 

c. 

0. 

Q. 

1 000  . 

0. 

0. 

277 

0. 

0. 

0. 

8. 

0. 

G. 

278 

0. 

0. 

0. 

0. 

0. 

0. 

279 

0. 

0. 

0. 

0. 

0. 

C. 

123 

0. 

0.  . 

0. 

0 . 

0. 

0. 

123 

0. 

0. 

0. 

0. 

0. 

0. 

123 

0. 

0. 

0. 

0 . 

0. 

0. 

123 

0. 

0. 

0. 

0. 

0. 

0. 

123 

c. 

0. 

0. 

0. 

0. 

0. 

123 

0. 

0. 

0. 

0. 

0. 

0. 

123 

c. 

0. 

0. 

0. 

0. 

0. 

001  8.6 

002  .507 

003  .489 

004  19.98 

005  19.92 

006  49.65 

007  44.85 

008  54.8 

009  57.2 

010  0. 

Oil  7380. 


50. 

0. 

3. 

0. 

0. 

100. 

0. 

0. 

1000 

1 . 

1. 

1. 

6. 

.05 

0. 

0. 

0. 

0. 

.52 

1.02 

0. 

0. 

0. 

0. 

0. 

0. 

0. 
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012  2^1980. 

013  25660. 

014  1140. 

015  696969. 

016  0. 

017  153000, 

018  10. 

019  129. 

020  129.  ' • ■ 

021  213. 

022  213. 

023  0. 

024  0 . 

025  33. 

026  33. 

027  56.  , 

028  56. 

029  0.0 
03C  0. 

031  12.75 

032  2CC0. 

033  1.  • 

034  2857.1 

035  11.32 

036  2845.5 

037  .36 

038  -5944.2 

039  0. 

04C  0. 

041  8592. 

042  16.3 

043 

044 

045 

046  • 

047  8.27 

048  696969. 

04 S 8.93 

050  9.28 

051  .3 

052  5.375 

053  0 . 

054  0. 

055  .59 

056  3.47 

057  -3.47 

058  -.0873 

059  .0873 

060  1.0 

061  69696.. 

062  696969. 

063 

064 

065 

066  40. 

067 

068 

069 

070 

071 

392 


HAIN175C 


MAI N1820 


HATN2190 


MAI N2220 
HAIN2230 
HAIN2240 
MAIN2250 
MAI N2260 
MAIH227C 
MAI N2280 
HAIN2290 
MAI N2300 


072 

073 

074 

075 
76 

077 

078 

079 
08C 
081 
082 

083 

084 

085 

086 

087 

088 


.010 

5.0 

1C60. 

1060. 

1240. 

1240. 


-,000512 

0.0 

1.26 

.CC00001 14 


MAIN2310 
MAIN2320 
«AI N2330 
MAIN2340 
MAIN2350 


MAIN2400 
HAIN2410 
«AI N2420 
MAIN2430 


089 

MAI N2480 

090 

MAIN249C 

091 

0.0 

MAI N2500 

092 

- 1.54 

093 

-1.03 

094 

MAIN2530 

095 

- 

MAI N2540 

096 

MAIN2550 

097 

MAI N2560 

098 

HAIN257C 

099 

MAIN2580 

100 

MAIN2590 

101 

MAI N2600 

102 

MAIN261 0 

103 

MAI N262C 

lO^i 

MAIN2630 

105 

HAIN264C 

106 

MAIH2650 

107 

1.0 

MAIN2660 

108 

.4 

MAIN2670 

109 

20. 

110 

4428. 

MAI N2690 

111 

738. 

MAIN27CC 

112 

0.0 

MAIN2710 

113 

1. 

MAIN2720 

114 

62. 

MAI N2730 

115 

1.0 

MAIN274C 

116 

0.5 

MAIN2750 

117 

■3 

^ • 

MAIN2760 

118 

3, 

MAI N2770 

119 

O.C 

120 

0.0 

121 

300. 

MAIN28C0 

122 

MAI N2810 

123 

MAIN2820 

124 

HAIN2830 

125 

' HAIH2840 

1 26 

MAI N2850 

127 

MAIN286C 

128 

3.0 

MAIN2870 

129 

0. 

HAIN2880 

130 

131 


.038 

.320 
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132 

44000. 

133 

44000. 

134 

6.2 

135 

6.20 

136 

17.6 

137 

126. 

138 

5.68 

139 

.010 

140 

- .0  1 0 

141 

0 . 

142 

0.0 

143 

0. 

144 

0. 

145 

.CCOOOO 1 147 

146 

0.0 

147 

0.0 

148 

0.0 

149 

C .0 

150 

0.0 

151 

o.c 

152 

0 .0 

153 

o.c 

154 

0.0 

155 

o.c 

156 

4216 .0 

157 

179.13 

158 

1094.0 

159 

160 

161 

162 

163 

164 

165 

166 

167 

168 

169 

73. 

170 

75. 

171 

75. 

172 

2. 

173 

174 

175 

0.25 

,176 

177 

178 

179 

180 

4. 

181 

182 

. 14 

183 

. 14 

184 

. 19 

185 

. 19 

186 

187 

188 

189 

0.0 

190 

V 

191 

MAI N3010 


MAIN318C  ; 

MAIN3190  ' 

MAIN32C0  [ 

MAIN3210  ' 

HAIN3220 

MATN3230 

MAIN3240 

MAIN3250 

HAIN3260 

HAIN3270 


HAIN3300 
MAIN3310 
MAIN3320 
MAI N3330 
HAIN33U0 
MAIN3350 
HAIU3360 
HAIB3370 


MAIN3450 

HAIN3460 

HAIN3470 

MAIN3480 

MAIN3490 

HAIN3500 
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192 

193 

194 

195 

196 

197 

198 

199 

200 

201 

202 

203 

204 

205 

206 

207 

208 

209 

21C 

211 

212 

213 

214 

215 

216 

217 

218 

219 

220 

221 

222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 


1 


0 . 

0. 


1.5 
1.24 

-.000198 
1 . 13 

-.000119 
. 80 
.82 
.03 

0. 

0. 

0.0 

0. 

0. 

0. 

. 0. 

0, 

0. 

0. 

0. 

0 . 

0.0 

0.0 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

400. 

4CC.  ' 

1.0 


HAIN3510 
«&I N3520 
MAIN3530 
MAI N3540 


MAIN  3570 
MAI N3580 
HAIN3590 
MAI N3600 


MAI N3680 
HAIN369C 
MAI N3700 
MAIN371C 
MAI N3720 
MAIN  3730 
MAI N3740 
HAIN375C 
MAI N3760 
MAIN  3770 


MAI NJ820 
MAIN3830 
MAI H3840 
MAIN3R''0 
MAI N3860 
MAIN387C 
MAI N38B0 
MAIN  3890 


1.9 
1 .9 
1.0 
1 .0 


- .0000372 
-.000022 
.0000020 
-.0006785 
0.0 
1.45 

.000000 16971 
-.002448 
.002856 
1 .02 
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252 

- .00156 

253 

.001 1491 

254 

1 .44 

255 

0.0 

256 

- .00104 

257 

-.007001 

258 

-5.22 

259 

0.0 

260 

- .00061 

261 

-.00604 

262 

-5.76 

263 

0. 

264 

0. 

265 

0. 

266 

. 29 

267 

.03 

268 

0. 

269 

0. 

270 

0. 

271 

0 . 

272 

. 13 

273 

.03 

274 

C . 

275 

- 0.0  . 

276 

C .0 

277 

0. 

278 

C. 

279 

0. 

280 

C. 

281 

282 

283 

0. 

284 

0.0 

285 

3.56 

286 

C.O 

287 

2. 

288 

0. 

289 

4. 

290 

1.0 

291 

-1441.2 

292 

16.44 

293 

3470.7 

294 

1 . 17 

295 

4139.5 

304 

./ 

ENDO 

MAIN4340 
MAIN4350 
MAI N4360 
MAIN4370 
MAI N4380 
HAIN43^0 


MAI N4420 


MAIN445C 

HAIN4470 
MAI N4480 


HAIII4550 
MAI N4560 


V.. 
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1 


INDEPENDENT  FRONT,  SOLID  REAR  SUSPENSION  - 
DODGE  CORONET 
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091  CABNEW  D0DGE71 

PSIDT  PHIDT  PHI  ZIHX(1)  ZIHX(3) 


SLIPI  (4) 

SLIPI(3)  SLIPI  (4) 


PPL  AXAVE  TIMDEC  AYHAX  SIIPI(I)  SLIPI  (2)  SLIPI  (3) 

PFL  AXAVE  AYMAX  BETDHX  COVBAT  SLIPI (1)  SLIPI (2) 

EMPN  BMPS  AYMAX  PHAX  COVBAT  BETDMX 
STE4  EETAMX  EETEHX  COVBAT  AYHAX  RMAX 
STBS  AYMAX  DEL  EETAMX  DELPSI  UIN 
PHIMAX  PHIDMX  HMAX  ZIMX(1)  2IHX(2)  ZIHX(3)  ZIMX(4)  UIN  BRKOFF 
PFL  AXAVE  AYMAX  BETDMX  COVBAT  SLIPI  (1)  SLIPI(2)  SLIPI  (3)  SLIPI(4) 


ANTI3  10000 
ANTI4  10000 
ETAX  1.4 
ETAL  1.4 
R 1.0 
0 1200. 

VOUT  1200i 
BTV  .35 
BTVDT  .4 
ENDNODAC 


MAI  N 
MAIN 

MAIN 

MAIN 

MAIN 


50 

60 

80 

90 

ICO 


lODT  (01) 

1C000. 

MAIN 

110 

lOOT  (02) 

10. 

MAI  N 

120 

lOUT  (C3) 

10000. 

MAIN 

130 

lODT (04) 

10. 

MAI  N 

140 

TOUT  (05) 

100. 

MAIN 

150 

IOUT(06) 

10000. 

MAIN 

160 

lOOT  (07) 

100. 

MAI  N 

170 

lOUT  (08) 

10000. 

lODT  (09) 

40000. 

MAIN 

190 

lOOT  (10) 

40000. 

MAI  N 

200 

NOTOSED( 1)  1.0. 

MAIN 

27C 

NOTUSED(I)  1.0 

lOUT  (-13) 

1.0  0. 

MAIN 

230 

lOOT  (14) 

1C000. 

MAI  N 

240 

lOUT  (15) 

100. 

MAIN 

250 

IOUT(  16) 

100. 

MAIN 

260 

lOUT  (11) 

10  . 

MAI  N 

210 

lOUT  (18) 

10. 

MAIN 

2RC 

.NOTUSED(I)  1,0 

MAIN 

290 

lOUT  (20) 

10. 

MAI  N 

300 

lOOT  (21) 

-20. 

lOOT  (22) 

-20. 

lOUT  (23) 

-20. 

I OUT  (24) 

-20. 

UGIP{  1) 

1500. 

MAIN 

35  0 

OGIPC2) 

1500. 

MAIN 

360 

OGIP  (3) 

1500. 

MAI  N 

370 

NOTUSFD(I)  1.0 

MAIN 

380 

0GIP(4) 

1500. 

MAIN 

390 

NOTUSFD(I)  1.0 

MAI  N 

400 

NOTOSED(I)  1.0 

MAIN 

410 

NOTUSED(I)  1.0 

MAI  N 

420 

IOOT(3  3)  -2. 

MAIN 

430 

TOUT (34)  -2. 

MAIN 

440 

IOOT(35)  -2. 

MAIN 

450 

IOUT(’-)  "2. 

MAIN 

460 

NOTDSFE { 

, .0 

ANTI1  10000. 

MAI  N 

480 

ANTI2  10000. 

MAIN 

490 

MAIN 
MAI  N 
MAIN 
MAIN 


500 

510 

520 

530 
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MAIN  590 


DELICT  -100. 
DEL2DT  -100. 
DEL3DT  -100. 
DEL1DA  10. 
DEL2DA  10. 

DEL3CA  10. 
PHIRD  -1. 
PHIRDA  .25 
DELFW1  -0.5 
DEIFW2  ^0.5 
U1P  2. 

02  P 2. 

03P  2. 

04  P 2. 

SIP  1000. 

S2P  1000. 

S3P  1000. 

SUP  1000. 

Q0AN1  1. 

QOAN2  1. 

Q0AN3  1. 

QOAN4  1. 

ARPS3  100. 
ARPS4.  100.. 
RWZ1A  -2. 

RWZ2A  -2. 

RHZ3A  -2. 

RWZ4A  -2. 
ENDNOACC 

INDXCN  4000 


HAIN  600 

MAIN  620 
MAIN  63C 

MAIN  650 


MAIN  680 
MAIN  690 
MAIN  700 
MAIN  710 
MAIN  720 
MAIN  730 


MAIN  780 
MAIN  790 
MAIN  800 
MAIN  810 
MAIN  820 
MAIN  830 


MAIN  880 
MAIN  890 

MAIN  900 


VEHICLE  MODEL  * DODGE  CORONET  1971 

-0.38  .1061661  .1684393  .01604185  -. 005793 72- . 0022083 5 0.0 

0.75  0.0  0.0  0.0  0.0  ■ 0.0  C.O 

-0.27  -. 2416662  -.00944941.01291661  - . C00896 3 1- . 00 1 2 5 0.0 


99999  . 

0. 

.05 

.1 
.15 
.2 
. 3 
.4 
.6 
.8 
1. 

99999  . 

0.0 

99999  . 

O.C 

99999  . 


0. 

.01 
.03 
.07 
. i i 

.35 
. 54 
.81 
.93 

1 . 

0.0 

0.0 


TABLE  III-  SIDE  FORCE  SHAPING  FUNCTION 


AERO  COEFFICIENTS 


MAIN91 1C 


0.0 

O.C 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

MAI N9140 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

MAIN9150 

0. 

0. 

TABLE- I - 

FRONT  BRAKE 

TORQUE 

FUNCTION 

1000. 

20640. 

99999. 

0. 

0. 

TABLE  II 

- REAR  BRAKE 

TORQUE 

FUNCTION 

MAI N9190 

1000. 

20640. 

MAIN9230 


HAIN9410 


Mi 


I 400 


0.0 


o.c 

99999  . 

0.0 

99999  . 

0.0 

99999  . 
O.C 

99999  . 

0.0 

99999  . 
-10.0 
-2.4 
O.C 
2.1 
10.0 
99999  . 
-10.0 
-2.4 
0.0 


0.0 


0.0 


0.0 

0.0 


-1688. 
-252. 
0.0 
221 . 
4866  . 

- 1688  . 
-252. 

0 .0 


FRONT  SPRING  DATA 


FRONT  SPRING  DATA 


2.1 

221. 

10.0 

4866. 

99999 

• 

• 

-10.0 

-234  2 .' 

REAR  SPRING 

DATA 

-4.4 

. -528. 

0.0 

0.0 

3.6 

432. 

10.0 

5962  . 

99999 

• 

-10. 0 

-2342. 

PEAR  SPRING 

DATA 

-4.4 

-528. 

O.C 

0.0 

3.6 

432. 

10.0 

5962. 

99999 

• 

O.C 

o 

• 

o 

fclND 

TUNNEL  DATA 

99999 

• 

066 

40. 

40. 

40. 

30. 

40. 

074 

0. 

0. 

0. 

30. 

0. 

076 

c 

w • 

10. 

10. 

5 . 

5.5 

112 

55. 

114 

62. 

0.  . 

82. 

1 39. 

0. 

115 

1. 

0. 

1. 

1 . 

1. 

116 

c 

• W 

100. 

.5 

.5 

.4 

117 

3. 

0. 

3. 

0. 

0. 

118 

0. 

3. 

0. 

0. 

121 

300. 

200. 

200. 

0. 

0. 

124 

0. 

0. 

0. 

0. 

0. 

125 

0. 

0. 

0. 

0. 

0. 

126 

0. 

0. 

0. 

0. 

0. 

128 

3. 

1. 

3. 

4. 

2. 

192 

1. 

. 1 

.1 

. 1 

.1 

198 

0. 

0. 

0. 

12. 

0. 

199 

c. 

0. 

0. 

57.6 

0. 

201 

0. 

0. 

0. 

1000. 

0. 

277 

0. 

0. 

0. 

8 . 

0. 

278 

0. 

0. 

0. 

0. 

0. 

279 

c. 

0. 

0. 

0. 

0. 

123 

0. 

0. 

0. 

0. 

0. 

123 

0. 

0. 

0. 

0. 

0. 

123 

0. 

0. 

0. 

0. 

0. 

45. 

0. 

4. 

0. 

C. 

100. 

0. 

0. 

0. 

2. 

0. 

1. 

5. 

. 1 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

0. 


50. 

0. 

3. 

0. 

0. 

100. 

0. 

0. 

10C0. 

1. 

1 . 

1. 

6. 

.05 

0. 

0. 

0. 

0. 

.52 

1.02 

0, 

0. 

0. 


401 


N 


123 

0. 

123 

0. 

123 

0. 

001 

8.43 

002 

0.51 

003 

0.82 

004 

11.3 

005 

11.3 

006 

49.  3 

007 

68.7 

008 

59.8 

009 

61.8 

01C 

47.0 

oil 

3758. 

0 12 

23047 

013 

23327 

014 

530. 

015 

550  . 

016 

0. 

017 

40400 

018 

10. 

019 

1 05.0 

020 

1C5.0 

021 

120.0  , 

022 

12C.0 

023 

0. 

024 

-5100 

025 

40.0 

026 

40.0 

027 

38.0 

028 

38.0 

029 

0 . 

03C 

0.020 

031 

13.2 

032 

1CC0. 

033 

0.75 

034 

2701. 

035 

10.14 

036 

2533. 

037 

1 .30 

038 

4591  . 

039 

0.0 

04G 

0.0 

041 

8000. 

042 

14.2 

043 

044 

045 

046 

047 

6.4 

48 

5 50. 

049 

9.4 

050 

9.4 

051 

0.7 

052 

2.71 

053 

0 .0 

054 

0.0 

055 

-0.66 

056 

4.59 

057 

-4.59 

0.  0. 

0.  c. 

0.  0. 


0. 

0. 

0. 


0. 

0. 

0. 


402 


MAIN973C 


MAI N9800 


MAIN9900 


/ 

'('  m 


058 

-.1309 

059 

.1309 

06C 

1.0 

061 

0.0 

062 

0.0 

063 

MAI S0200 

064 

MAINC21C 

065 

HAIM0220 

066 

40. 

MAINC240 

067 

068 

MAIN0250 

069 

MAIN0260 

070 

MAI N0270 

071 

072 

MAI S0290 

073 

MAIN030C 

074 

MAIN0310 

075 

.005 

76 

5.0 

077 

1450. 

078 

1450. 

079 

1450. 

080 

1450. 

081 

082 

083 

084 

085 

- .00033 

086 

0.0 

087 

1.228 

088 

.0000000759 

089 

HAINC460 

090 

MAI N0470 

091 

0.0 

MAIN048C 

092 

-0.8 

0 93 

- .68 

094 

MAI NC510 

095 

MAINC520 

096 

MAIN0530 

097 

MAIN0540 

098 

BAIN0550 

099 

MAIN0560 

100 

MAI W0570 

101 

MAIN0580 

102 

MAIN0590 

103 

HAINC6C0 

104 

MAI H0610 

105 

MAINC62C 

106 

MAI N0630 

107 

1.0 

MAIN064C 

108  0.5 

109  15. 

110  0.0 
111  0.0 
112  0.0 

113  1. 

114  25. 

115  1.0 

116  0.5 


BAIII0700 


118 

3. 

119 

120 

121 

300. 

122 

123 

124 

125 

126 

127 

A 

128 

3.0 

129 

0 . 

130 

0.06 

131 

16.0 

132 

55900 

133 

55900 

134 

6.62 

135 

6.62 

136 

11.0 

137 

54. 

138 

5.20 

139 

0.45 

14G 

-0.45 

141 

.0. 

142 

88. 

143 

.03 

144 

.04 

145 

.001 

146 

. 10 

147 

.010 

148 

.001 

149 

. 006 

150 

. 001 

151 

. 001 

152 

. 0001 

153 

. GC01 

154 

. 0003 

155 

. 0004 

156 

500. 

157 

158 

159 

160 

161 

162 

163 

164 

165 

166 

167 

168 

169 

73. 

170 

73. 

171 

73. 

172 

2 . 

173 

174 

175 

0.25 

176 

177 

MATN076C 
MAI N077C 

MAI N0790 
MAINC8CC 
MAIN0810 
MAINC820 
MAI N0830 
MAINQ840 

MAINC860 


MAINC980 


MAIN1140 
MAI B1 150 
HAim  16C 
HAIN1170 
MAIN  1180 
MAI N1 190 
MAIN1200 
HATN1210 
MAIN  1220 
MAI N123C 
MAIN1240 
MAIN1250 


MAIN1290 
HAIN13C0 
MAI H1310 
HAIN1320 
HAIH1330 
MAIN134C 


MAIN1350 


178 

179 

180  4,0 

181 

182  0.17 

183  C.17 

184  0.17 

185  0.17 

186 

187 

188 

189  C.O 

190 

191 

192  1. 

193 

194 

195 

196  0. 

197  0. 

198 

199 

200  1.5 

201  , 

202  0.94 

203  -.00008 

204  0.94 

205  -.00008 

206  0.65 

207  0.65 

208  .03 

209  0. 

210  0. 

211  0.0 
212  0, 

213  0. 

214  0. 

215  0. 

216  0. 

217  0. 

218  0. 

219  0. 

220  0. 

221  0. 

222  0. 

223  0.0 

224  0. 

225  0. 

226  0. 

227  0. 

228  0. 

229  0. 

230  0. 

231  400. 

232  400. 

233  1 .0 

234 

235 

236 

237 


MAI N1430 
MAIN  1440 
MAIN1450 

MAI H1470 
MAIN148C 
MAIN1490 
MAIN  1500 
MAI N1510 
MAIN  1520 


MAI N1570 


MAIN  1680 

MAIN1710 


4 

,405 


238 

1. 

239 

1 . 

240 

.67 

241 

.67 

242 

-.0000393 

243 

-.0000332 

244 

.00000 175 

24  5 

- .00033 

246 

0.0 

247 

1,228 

248 

.00000007 

249 

-.00318 

250 

.00349 

251 

1.404 

252 

-.00318 

253 

.00349 

254 

1.404 

255 

0.0 

256 

-.0015 

257 

- .005244 

258 

-5.592 

259 

0.0 

260 

-.0015 

261 

.-.005244 

262 

-5.592 

263 

-0. 13 

264 

-.03 

265 

.0 

266 

0.15 

267 

.015 

268 

.0 

269 

0.089 

27C 

.01 

271 

.0 

272 

o 

• 

o 

273 

.0 

274 

.0 

275 

0.0 

276 

0.0 

277 

0. 

278 

0. 

279 

0 . 

280 

0. 

281 

282 

283 

0. 

284 

2.7 

285 

3.9 

286 

0.0 

287 

1. 

288 

0. 

289 

4 . 

290 

0.75 

291 

2701. 

292 

10.  14 

293 

2533. 

294 

1.30 

295 

4591  . 

001 

8.82 

004 

10.9 

MAIN2340 

MAIN2350 

MAIN2360 

MAIN2370 


MAIN24CC 


HAIN2450 

HAIS2470 
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005  10.8 

006  50.5 

007  67.5 

011  3832. 

012  24003. 

013  24311. 

092  -1.1 

093  -1.08 

304  MAIN2660 

./  ENDUP 
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SOLID  FRONT  AND  REAR  SUSPENSION  WITH 
DUAL  REAR  TIRES  - WINNEBAGO  MOTOR  HOME 


409 


076  CABNEW  MOTOR 

FSI(1)  FRI(2)  F5ROD  F3RID  F4RID  F6ROD  ETAX  ETAL 
FSI(1)  FSI(2)  FSI5  FSI3  FSI4  FSI6  PHI 
FYDI(l)  FYDI(2)  FYD5  FYUI  (3)  FYUI  (4)  PYD6  P 
FXUI(1)  FXOI  (2)  FXU5  FXUI(3)  FXOI(4)  FX06  R 
SLIPI(I)  SLIPK2)  S50D  S3ID  S4ID  S60D  BTV 
BETAI(I)  BETAK2)  BETAI(3)  BETAI  (4)  CF50D  CF3ID  X 
AHUT(1)  AMDT  (2)  AHOI5  AHUI3  AMOI4  AMOI6  T 


MAIN 

30 

PFL  AXAVE  TIMDEC  AYMAX  SLIPI(I)  SLIPI(2)  SLIPI(3)  SLIPI  (4) 

MAI  N 

40 

PFL  AXAVE  AYMAX  BETDMX  CUVRAT  SLIPI  (1)  SLIPI  (2)  SLIPI  (3)  SLIPI(4) 

MAIN 

50 

BMPN  BMPS  AYMAX  EHAX  COVRAT  BETDMX 

MAI  N 

60 

STR4  BETAMX  BETDMX  CDVRAT  AYMAX  RMAX  PHIHAX 
STR5  AYMAX  DEL  BETAMX  DlLPSI  UIN 

MAIN 

80 

PHIHAX  PHIDHX  RMAX  ZIMX(1)  ZIMX(2)  ZIHX(3)  ZIMX(4)  DIN  BRKOFF 

MAIN 

90 

PFL  AXAVE  AYMAX  BETDMX  CDVRAT  SLIPI  (1)  SLIPI  (2)  SLIPI(3)  SLIPI(4) 

MAIN 

ICC 

lOOT(OI)  10000. 

MAIN 

110 

IODT(C2)  10. 

MAIN 

120 

IOUT(03)  1C000. 

MAIN 

130 

TOUT  (04)  10. 

MAI  N 

140 

IOUT(C5)  100. 

MAIN 

150 

IOUT(06)  1C000. 

MAI  N 

160 

IOOT.(07)  .100  , 

MAIN 

170 

IOOT(C8)  100. 
IOUT(09)  40000. 

MAI  N 

190 

IOUT{  10)  40000. 

MAIN 

200 

NOTUSED(I)  1.0 
NOTDSED(I)  1.0 
IODT(13)  100. 

MAIN 

230 

IOUT(14)  10000. 

MAI  N 

240 

IOUT(15)  100. 

MAIN 

250 

IOUT(16)  100. 

MAI  N 

260 

IODT(11)  10. 

MAI  N 

210 

IOUT(18)  10. 

MAIN 

280 

NOTDSED(I)  1.0 

MAI  N 

290 

lOUT  (20)  10. 

MAI  H 

300 

IOUT(21)  -20. 
IODT(22)  -20. 
IOUT(23)  -20. 
IOUT(24)  -20. 
UGIP(1)  1500. 

MAIN 

350 

DGIP(2)  1500. 

MAIN 

360 

OGIP(3)  1500. 

HAIM 

370 

NOTUSED(I)  1.0 

MAIN 

380 

UGIP(4)  1500. 

MAI  N 

390 

NOTUSED(I)  1.0 

MAIN 

400 

NOTDSED(I)  1.0 

MAIN 

410 

NOTDSEEfr  1.0 

MAI  N 

420 

IuUT(3  3)  -2. 

MAIN 

430 

IOUT(34)  -2. 

MAIN 

440 

IODT(35)  -2. 

MAIN 

450 

IODT(36)  -2. 

MAI  N 

460 

MOTUSED(I)  1.0 
ANTI1  10000. 

MAIN 

480 

ANTI2  10000. 

MAIN 

490 

ANTI3  10000. 

MAIN 

5C0 

AHTI4  10000. 

MAIN 

510 

ETAX  1.4 

MAIN 

520 

ETAL  1.4 

MAIN 

530 

411 


R 1.0 

U 1200. 

VOUT  1200. 

BTV  .35 
BTVDT  .4 
ENDNOCAC 
DELICT  -ICO. 
DE12DT  -1. 
DEL3CT  -100. 
DELU'A  10, 
DEL2DA  .25 
DEL3DA  10. 
PHIRD  -1. 
PRIRDA  .25 
DELFW1  -0.5 
DELFW2  -0.5 
DIP  2. 

U2P  2. 

03 P 2. 

04P  2 . 

SIP  4CC0. 

S2P  4000. 

S3P  4000. 

S4P  4000.  . 
QUAN1  1. 

QOAN2  1. 

QUAN3  1. 

QOAN4  1. 

ARPS3  100. 
ARPS4  100. 
RWZ1A  -2. 
RWZ2A  -2. 
RWZ3A  -2. 
RWZ4A  -2. 
ENDNOADC 

INDXCN  4000 


VEHICLE 

MODEL  * 

HINNABAGO 

MOTOR  HOME 

TYPE  A 

(DODGE  RM  400/158. 

O.C 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

C.O 

0.0 

C.O 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

O.C 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

0.0 

O.C 

0.0 

0.0 

0.0 

0.0 

0.0 

O.C 

0.0 

TABLE 

I * ERAKF 

TORQUE 

FUNCTION 

80. 

C.O 

1000. 

53000. 

1600. 

KO. 

99999  . 

0.0 

0.0 

TABLE 

II  ♦ BRAKE 

TORQUE 

FUNCTION 

80, 

0.0 

1000. 

53000. 

1600. 

75000. 

99999  . 

0. 

0. 

TABLE 

III-  SIDE 

FORCE  SHAPING  FUNCTION 

.05 

.01 

. 1 

.03 

.15 

.07 

.2 

. 17 

412 

MAIN  560 


MAIN  590 
MAIN  600 

MAIN  620 
MAIN  630 

MAIN  650 


MAIN  680 
MAIN  690 
MAIN  700 
MAIN  710 
MAIN  720 
MAIN  730 


MAIN  780 
MAI N 790 
MAIN  800 
MAIN  81C 
MAIN  820 
MAIN  830 


MAIN  880 
MAIN  890 

MAIN  900 


1 


. 3 

. 35 

.4 

. 54 

.6 

.81 

.8 

.93 

1. 

99999  . 

1 . 

0.0 

.78 

.08727 

.79 

. 1745 

.83 

.2618 

.90 

.3491 

.94 

.4364 

.94 

1.6 

0.0 

3.14 
99999  . 

0.0 

O.C 

0.0 

.08727 

.33 

.1745 

. 58 

.2618 

.90 

.3491 

1.33 

. 4364  ' 

1 .82 

1.6 

0.0 

3.  14 

0.0 

99999  . 

0.0 

. 15 

.08727 

.29 

. 1745 

.45 

.2618 

.55 

.3491 

.84 

.4364 

1.11 

1.6 

0.0 

3.14 
99999  . 

0 .0 

0.0 

0.0 

.08727 

. 12 

.1745 

.20 

. 2618 

. 34 

.3491 

.48 

.4364 

.64 

1 .6 

0.0 

3.  14 
99999  . 

0.0 

O.C 

. 19 

.08727 

.25 

. 1745 

.29 

.2618 

. 33 

.3491 

. 35 

.4364 

. 37 

1.6 

0.0 

3.14 
99999  . 

0.0 

0.0 

0.0 

.08727 

-.12 

.1745 

-.15 

.2618 

-.15 

.3491 

-.15 

.4364 

-.17 

1.6 

0.0 

3.14 
99999  . 

0.0 

AERO  COEPFICIEBTS 


413 


MAI N1 180 


( 

l> 


0.0 

0.0 

.08727 

0.0 

.1745 

0.0 

.2618 

0.0 

. 3491 

0.0 

.4364 

0.0 

1.6 

0.0 

3.14 

0.0 

99999  . 

-10.0. 

-6579. 

FPONT 

SPRING 

DATA 

-2.3 

- 1035.0 

0.0 

0.0 

3.  1 

1395.0 

10.0 

10089. 

99999  . 

-1C.0 

-6579. 

FRONT 

SPRING 

CAT  A 

-2.  3 

-1035.0 

0.0 

0.0 

3.1 

1395.0 

10.0 

10089. 

99999  . 

- 1 0 . C 

-10366.5 

■ REAR 

SPRING 

DATA 

-3.9 

-3412.5 

0.0  , 

0.0 

2.7 

2362.5 

10.0 

15137.5 

99999  . 

-1C.0 

-10366.5 

REAR 

SPRING 

DATA 

-3.9 

-3412.5 

0.0 

0.0 

2.7 

2362.5 

10.0 

15137.5 

99999 . 

1128. 

0.0 

HIND  PROFILE  DATA 

1140. 

1056. 

1248. 

10  56. 

1260. 

0.0 

99999  . 

066  40. 

40. 

40. 

30. 

074  0. 

0. 

0. 

30. 

076  5. 

10.. 

10. 

5. 

114  62. 

0. 

62. 

77. 

115  1 . 

0. 

1 . 

1 . 

116  .5 

100. 

.5 

.5 

1 17  3. 

0. 

3. 

0 . 

118  3. 

0. 

3. 

0. 

121  300. 

200. 

200. 

0. 

124  0. 

0. 

0. 

0. 

125  0. 

J. 

0. 

0. 

126  0. 

0. 

0. 

0. 

128  3. 

1. 

3. 

4 . 

192  1. 

. 1 

. 1 

. 1 

198  0. 

0. 

0. 

12. 

199  0. 

0. 

0. 

57.6 

201  0. 

0. 

0. 

1000. 

277  0. 

0. 

0. 

8. 

278  0. 

0. 

0. 

0. 

279  0. 

0. 

0. 

0. 

123  0. 

0. 

- 

0. 

0. 

123  0. 

0. 

0. 

0. 

uo. 

0. 

5.5 

0. 

1. 

.4 

0. 

0. 

0. 

0. 

0. 

0. 

2. 

.1 


45. 

0. 

4. 

0. 

0. 

100. 

0. 

0. 

0. 

2.5 

0. 

1 . 

5. 

. 1 


0. 

0. 

0. 

0. 

0. 

0. 

0. 

0. 


0. 

0. 

0. 

0. 

0. 

0. 

0. 


50. 

0. 

3. 

0. 

0. 

100. 

0. 

0. 

1000. 

1. 

1. 

1 . 

6. 

.05 

0. 

0. 

0. 

0. 

.52 

1.02 

0. 

0. 


I 


123  0.  0. 

123  0.  0. 

123  0.  0. 

123  0.  0. 

123  0.  0. 


001  24.609 

002  1.721 

003  2.888 

004  36.30 

005  36.19 

006  99.41 

007  59.09 

008  66.15 

009  66.12 

010  41.24 

011  40300. 

012  219100. 

013  216500. 

014  71C0. 

015  2400. 

016  0. 

017  153000. 

018  10. 

019  .450. 

020  450. 

021  875. 

022  875. 

023  0. 

024  153000. 

025  100. 

026  ICO. 

027  150. 

028  150. 

029  0.0 

030  -.01 

031  16.87 

032  4000. 

033  1.0 

034  635.2 

035  11.98 

036  5447.9 

037  1.89 

038  63C6.2 

039  56.62 

040  75.62 

041  8000. 

042  17.5 

043 

044 

045 

046 

047  27.0 

048  1500. 

049  21.3 
05C  48.0 

051  1.30 

052  4.56 

053  31.0 

054  .07 

055  1.31 


0. 

0. 

0. 

0. 

0. 


0. 

0. 

0. 

0. 

0. 


0. 

0. 

0. 

0. 

0. 


0. 

0. 

0. 

0. 

0. 


HAIN175C 


MAI N1820 


415 


o o o o o 


HAIN2190 


056  6.08 

057  -6.08 

058  - . 12217 

059  .12217 

060  1.0 
061  0. 

062  0 . 

063 

064  HAIN2220 

065  ' MAIN2230 

066  40.  HAIN2240 

067  (1AIN2250 

068  MAIN2260 

069  HAIN2270 

070  MAIK2280 

071  MAIN2290 

072  HAIN2300 

073  MAIN2310 

074  MAIN2320 

075  .010  MAIN2330 

76  5.0  HAIN2340 

077  3040.  . nAIR2350 


078  3040. 

079  3040. 

080  3040. 


081 

082 

083 

084 


MAI N2400 
HAIN2410 
MAI N2420 
HAIN2430 


, 085  -.000236 
086  0.0 

087  1.32 

088  .0000000297 


089 

090 


HAIN2480 
MAI N2490 
HAIN25C0 


091  0.0 

092  0.0 

093  0.0 


094 

095 

096 

097 

098 

099 

100 
101 
102 

103 

104 

105 

106 


MAI N2530 

MAIN254C 

HAIN2550 

MAIN2560 

MAI N2570 

MAIN258C 

MAIN2590 

HAIS2600 

MAI N2610 

MAIN2620 

MAIN2630 

MAIN2640 

MAIN2650 

MAIN2660 

MAIN2670 


107  1.0 

108  .4 

109  20. 

110  4428. 

111  738. 

112  0.0 

113  1. 

114  62. 

115  1.0 


HAIN269C 

HAIN2700 

MAIN2710 

MAIN2720 

HAIN273C 

MAIN2740 


416 


MAIH2750 
HAI 82760 
MRIN2770 


116  0.5 

117  3. 

118  3. 

119  0.0 

120  0.0 

121  300. 

122 

123 

124 

125 

126 

127 

128  3.0 

129  0 . 

130  .078 

131  .279 

132  150000. 

133  150000. 

134  8.02 

135  8.02 

136  11. 

137  120. 

138  7.50 

139  ,.  009 
14C  -.009 

141  0. 

142  C.O 

143  0. 

144  0 . 

145  .0000001147 

146  0.0 

147  0.0 

148  0.0 

149  C.O 
15C  0.0 

151  0.0 

152  C.O 

153  0.0 

154  0.0 

155  0.0 

156  9100. 

157  294, 

158  1094. 

159 

160 
161 
162 

163 

164 

165 

166 

167 

168 

169  73. 

170  75. 

171  75. 

172  2. 

173 

174 

175  0.25 


MAI82800 
MAIN2810 
MAIN2820 
MAI N2830 
nAIN2840 
HAI 82850 
MAIN2860 
HAI 82870 
MAIN2880 


MAIN3000 
MAI  83010 


HAIN3060 
MAI  83070 
MAI83080 
MAIN3090 
H A I N 3 1 0 0 
MAI831 10 
HAIN3120 
MAI  83130 
MAI83140 


HAIN3180 
HAI 83190 
MAI8320C 
MAI83210 
MAIN3220 
MAI  83230 
HAIN3240 
HAI 83250 
MAI83260 
HAI 83270 


HAIN3300 
HAI 83310 
HAIN3320 
MAIN3330 
MAI83340 


417 


BAI H3350 
HAIlj3360 
MAIN3370 


176 

177 

178 

179 

180 

4. 

181 

182 

. 20 

183 

. 20 

184 

. 20 

185 

. 20 

186 

187 

188 

189 

0.0 

190 

191 

192 

1 . 

193 

194 

195 

196 

- .0018 

197 

.0018 

198 

199 

200 

1.5 

201 

202 

1 .04 

203 

-.0000758 

204 

1 .04 

205 

- .0000758 

206 

.72 

207 

. 72 

208 

.03 

209 

0. 

210 

0. 

211 

0.0 

212 

0. 

213 

0. 

214 

0. 

215 

0. 

216 

0. 

217 

0. 

218 

0. 

219 

. 0349 

220 

-0.0349 

221 

.0698 

222 

. 0698 

223 

0. 

224 

0. 

225 

0. 

226 

0. 

227 

0. 

228 

0. 

229 

0. 

230 

0. 

231 

600. 

232 

600. 

233 

0. 

234 

235 

HAIN3U50 
MAI N3460 
MAIN3470 
MAI N348C 
MAIN3490 
MAI N3500 
MAIN3510 
MAI N3520 
MAIN  3530 
MAI N3540 


MAIN3570 
MAI N3580 
MAIN3590 
MAI N3600 


HAIN3680 
MAIN3690 
MAI N3700 
MAIN3710 
MAI N3720 
MAIN3730 
MAI N3740 
MAIN375C 
MAIN3760 
MAIN377C 


MAI B3820 
MAIN3S30 
HAIN3840 
HAIN3850 
MAI N3860 
HAIN3870 
HAIN3880 
MAIN3890 
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236 

237 

238  1.13 

239  1.13 

2U0  1.0 

241  1.0 

242  -.000020 

243  -.000020 

244  .0000015 

245  -.000236 

246  O.C 

247  1.32 

248  .0000000297 

249  -.00157 
25C  .G0 148 

251  1.608 

252  -.00157 

253  .00148 

254  1.608 

255  0.0 

256  -.000624 

257  .00240 

258  -9.132 

259  0.0 

26C  -.000624 

261  .00240 

262  -9.132 

263  0 . 

264  0 . 

265  0. 

266  C. 

267  0 . 

268  C. 

269  0 . 

270  0. 

271  0. 

272  0. 

273  0. 

274  0. 

275  0.0 

276  0.0 

277  0. 

278  0. 

279  0. 

28C  0 . 

281 

282 

283  0. 

284  0 . 

285  0. 

286  0.0 

287  0. 

288  1 . 

289  4. 

29C  1.0 

291  635.2 

292  11.98 

293  5447.9 

294  1.89 

295  6306.2 


MAI N4340 
MAIN4350 
MAI N4360 
MAIN4370 
MAI N4380 
HAIH4390 


MAI N4420 


MAIF4450 


MAIN4480 
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2.  PRESENTED  HERE  ARE  THE  WHEEL  SPRING 
AND  SHOCK  ABSORBER  CHARACTERISTICS 
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WHEEL  SPRING  CHARACTERISTICS 

The  entries  in  this  table  are  the  values  of  the 
slopes  versus  suspension  displacement  for  the  no-load  (curb 
weight)  vehicle  configuration.  The  units  of  the  entries 
are  Ibs/in  and  inches. 


Vehicle 


Spring  Force  Effective 
at  the  Wheel  for  the 
Independent  Front  Sus- 
pension and  at  the 
Spring  Location  for 
the  Solid  Front  Axle 


Spring  Force  Effective 
at  the  Wheel  for  the  In- 
dependent Rear  Suspension 
and  at  the  Spring  Loca- 
tion for  the  Solid  Rear 
Axle 


vw 

935 

for 

6^  0.43 

Campmobile 

129 

for 

-3.74<6<  0.43 

361 

for 

-4.92<6^-3.74 

896 

for 

-5.67<6^-4.92 

4413 

for 

6^-5. 67 

991 

for 

6> 

2. 

.28 

213 

for 

-1  , 

.57<6< 

2, 

.28 

328 

for 

-3, 

.54<6l- 

-1  , 

.57 

454 

for 

-4, 

.6K61- 

-3, 

.54 

2766 

for 

-4, 

.61 

Dodge 

558 

for 

6>  2.1 

Coronet 

105 

for 

-2.4  <6<  2.1 

189 

for 

6<-2.4 

864 

for 

3.6 

120 

for 

-4.4  <C< 

3.6 

324 

for 

Cl' 

-4.4 

Winnegabo 

1260 

for 

3.1 

Motor 

Home 

450 

for 

-2.3  <C<  3.1 

720 

for 

Cl-2.3 

1750 

for 

C^ 

2.7 

875 

for  -3.9  <C< 

2.7 

1140 

for 

Cl' 

-3.9 
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SHOCK  ABSORBER  CHARACTERISTICS 

The  entries  in  this  table  are  the  values  of  the 
slopes  versus  suspension  velocity.  The  units  of  the  entries 
are  lbs/ (in/sec)  and  in/sec. 

Viscous  Damping  Force  Viscous  Damping  Force 
Effective  at  the  Wheel  Effective  at  the  Wheel 
for  the  Independent  for  the  Independent 

Front  Suspension  and  Rear  Suspension  and  at 
at  the  Spring  Location  the  Spring  Location 
for  the  Solid  Front  for  the  Solid  Rear 


Vehicle 

Axle 

Axle 

VW 

5.14 

for 

6^ 

11.8 

1 1 .24 

for 

6> 

9.8 

Campmobile 

17.63 

for 

3.0i<5< 

11.8 

35.60 

for 

4.2^5< 

9.8 

9.55 

for 

0^6< 

3.0 

22.86 

for 

0^6< 

4.2 

4.06 

for 

-15.0^6< 

0 

7.93 

for 

-10.6<(5< 

0 

2.09 

for 

6<- 

15.0 

2.49 

for 

6<- 

10.6 

Dodge 

9.36 

for 

<s> 

0 

6.63 

for 

0 

Coronet 

4.33 

for 

6< 

0 

8.32 

for 

1 

• 

to 

A 

A 

0 

1.50 

for 

?<- 

7.2 

Winnebago 

9.6 

for 

6.0 

5.34 

for 

i> 

4.4 

Motor 

Home 

25.02 

for 

1 .4ic< 

6.0 

13.76 

for 

Q.8<i< 

4.4 

118.15 

for 

01C< 

1.4 

73.50 

for 

o^c< 

0.8 

12.84 

for 

-8.4lC< 

0 

3.47 

for 

V 
•kj' 

VI 
00 

• 

1 

0 

3.10 

for 

c<- 

• 8.4 

8.49 

for 

• 

C< 

-9.8 
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3.  PRESENTED  HERE  ARE  THE  CAMBER, 
CASTER,  AND  TOE  DATA 
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CAMBER,  CASTER,  AND  TOE  DATA 

To  obtain  these  data,  the  wheel  was  moved  from  the 
full  rebound  position  to  compression  bump  stop.  In  order 
to  use  these  data  in  calculations , one  must  know  the  values 
of  camber,  caster,  and  toe  at  a reference  value  of  suspension 
displacement  which  depends  upon  vehicle  loading.  The  units 
of  the  entries  are  inches  and  degrees.  The  data  presented 
here  were  measured  with  reference  to  a no-load  (curb  weight) 
vehicle  configuration. 


Displace- 

Vehicle  ment  Camber  Caster  Toe 


VW  Campmobile  (right  front 
wheel)  (static  displace- 
ment = 0.0) 


VW  Campmobile  (right  rear 
wheel)  (static  displace- 
ment = 0.0) 


0.5 

1 .00 

2.67 

-0.10 

0.0 

0.95 

2.77 

-0.07 

-1.0 

0.90 

2.85 

-0.05 

-2.0 

0.80 

2.95 

-0.02 

-3.0 

0.70 

3.00 

0.00 

o 

• 

1 

0.60 

3.05 

0.03 

-5.0 

0.50 

3.08 

0.07 

-5.5 

0.35 

3.05 

0.10 

2.5 

0.80 

0.00 

-0.333 

2.0 

0.45 

0.00 

-0.258 

1.0 

-3.00 

0.00 

-0.146 

o 

• 

o 

-1.00 

0.00 

-0.050 

-1.0 

-1 .75 

0.00 

0.000 

-2.0 

-2.50 

0.00 

0.000 

-3.0 

-3.35 

0.00 

-0.004 

-4.0 

-4.25 

0.00 

-0.075 

-4.5 

-4.75 

0.00 

-0.162 
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CAMBER,  CASTER,  AND  TOE  DATA  (Cont'd) 

Displace- 


Vehicle 

ment 

Camber 

Caster 

Toe 

Dodge  Coronet  (left  front 

0. 

0 

0.75 

0 

wheel)  (static  displace- 

1. 

0.41 

0.00 

-0.37 

ment  = 3.0) 

2. 

0.98 

0.00 

-0.59 

3. 

1.26 

0.00 

1 

o 

• 

00 

cn 

4. 

1.22 

0.00 

-1.05 

5. 

0.95 

0.00 

-1  .21 

6. 

0.43 

0.00 

-1.36 

Winnebago  Motor  Home  - The 

attitudes 

of  the 

wheels  of 

a solid 

axle  suspension  are  evaluated  from  axle  angular  displacement, 
suspension  geometry  (roll  steer) , and  suspension  compliance. 
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4.  PRESENTED  HERE  ARE  THE  PARAMETER 
TABLE  OUTPUT 
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PARAMETER  VALUES  - MODEL  C - VEHICLE  MODEL  * VW  CAMPMOBILE  1973 


1 

MS  = 

8.6000 

, 2 

MUF  = 

0.50700  , 

3 

MURs 

0.48900  , 

4 

ZF  = 

19.980  , 

5 

ZRs 

19.920 

b 

A» 

49.650 

, 7 

B = 

44.850  , 

8 

TF  = 

54.800  , 

9 

TRs 

57.200  , 

10 

TSRs 

0.0 

11 

IX  = 

7380.0 

• 12 

IY  = 

24980.  , 

13 

IZ  = 

25660.  , 

14 

IXZS 

1140.0  , 

15 

IRs 

0.6.9697E  06 

16 

s 

0.0 

, 17 

RF  = 

0.15300E  06, 

18 

STOPS 

10.000  , 

19 

AKFls 

129.00  , 

20 

AKF2s 

129.00 

21 

AKR3  = 

213.00 

, 22 

AKR4  = 

213.00  , 

23 

B 

0.0  , 

24 

RRs 

0.0  , 

25 

CFlPs 

33.000 

26 

CF2P= 

33.000 

, 27 

CR3P  = 

56.000  , 

28 

CR4P= 

56.000  , 

29 

ZBASs 

0.0  , 

30 

KRSs 

0.0 

31 

RMs 

12.750 

, 32 

SCAL  = 

2000.0  , 

33 

FOT  = 

1.0000  , 

34 

A0  = 

2857.1  , 

35 

Als 

11.320 

36 

A2= 

2845.5 

, 37 

A3= 

0.36000  , 

38 

A4b 

-5944.2  , 

39 

TIR  s 

0.0  , 

40 

TOR  * 

0.0 

41 

KSC  = 

8592.0 

, 42 

NG= 

16.300  , 

43 

= 

0.0  , 

44 

s 

0.0  , 

45 

s 

0.0 

46 

s 

0.0 

, 47 

IFW  = 

8.2700  , 

48 

IF  = 

0.69697E  06, 

49 

IWFs 

8.9300  , 

50 

IWRs 

9.2800 

51 

IDR  = 

0.30000 

, 52 

ARR  = 

5.3750  , 

53 

TSF  = 

0.0  , 

54 

KFS  s 

0.0  , 

55 

PTs 

0.59000 

56 

YSAls 

3.4700 

, 57 

YSA2  = 

-3.4700  , 

58 

PHSls- 

0.87300E-01, 

59 

PHS2  = 

0.87300E-01  , 

60 

CTSWs 

1.0000 

61 

IDF  = 

0.69697E  06,  62 

ARF  = 

0.69697E  06, 

63 

P-IN3 

0.0  , 

64 

Q-IN= 

0.0  , 

65 

R-INs 

0.0 

66 

U-IN= 

40.000 

, 67 

V-IN= 

0.0  , 

68 

W-INs 

0.0.  , 

69 

X-IN  = 

0.0  , 

70 

Y-INs 

0.0 

71 

Z-IN= 

-31.892 

, 72 

THIN= 

0.23314E-02, 

73 

PHIN= 

0.0  , 

74 

PSINs 

0.0  , 

75 

DTs 

O.lOOOOE-01 

76 

TN= 

5.0000 

, 77 

KT1  = 

1060.0  , 

78 

KT2  = 

1060.0  , 

79 

KT3s 

1240.0  , 

80 

KT4s 

124Q.0 

81 

RPS1  = 

0.0 

, 82 

RPS2= 

0.0  , 

83 

RPS3= 

0.0  , 

84 

RPS4= 

0.0  , 

85 

B1S-0.51200E-03 

86 

B2= 

0.0 

. 87 

B3= 

1.2600  , 

88 

B4z 

0.11400E-06, 

89 

D10T  = 

0.0  , 

90 

D2DTS 

0.0 

91 

D3DT  = 

0.0 

, 92 

delf= 

-1.5400  , 

93 

DELR  = 

-1.0300  , 

94 

DEL3= 

0.0  , 

95 

PHDTs 

0.0 

96 

PHIR= 

0.0 

» 97 

DFWl  = 

0.0  , 

98 

0FW2= 

0.0  , 

99 

UlPRs 

0.0  , 

100 

U2PRS 

0.0 

101 

U3PR  = 

0.0 

, 102 

U4PHS 

0.0  ' , 

103 

S1PR  = 

0.0  , 

104 

S2PRs 

0.0  , 

105 

S3PRs 

0.0 

106 

S4PR  = 

0.0 

, 107 

PPRT  = 

1.0000  , 

loe 

FREQs 

0.40000  , 

109 

RWSF  = 

20.000  , 

no 

TOMXs 

4428.0 

111 

KTQ= 

738.00 

, 112 

VC  = 

0.0  , 

113 

MTSws 

1.0000  , 

114 

DSWMs 

62.000  , 

115 

TSTs 

1.0000 

116 

DSLP  = 

0.50000 

, 117 

CG  AM  = 

3.0000  , 

118 

CSs 

3.0000  , 

119 

TORS 

0.0  , 

120 

TOFs 

0.0 

121 

PFL  = 

300.00 

, 122 

Tl  = 

0.0  , 

123 

DSWs 

0.0  , 

124 

s 

0.0  , 

125 

lSW5s 

0.0 

126 

SW15= 

0.0 

, 127 

POSW  = 

0.0  , 

128 

VTPSs 

3.0000  , 

129 

VHTPs 

0.0  , 

130 

AMCRs 

0.38000E-01 

131 

ESP  = 

0.32000 

, 132 

KSL1  = 

44000.  , 

133 

KSL2s 

44000.  , 

134 

AAl  = 

6.2000  , 

135 

AA2s 

6.2000 

136 

CCR  = 

17.600 

, 137 

CFCR  = 

126.00  , 

138 

AP  = 

5.6800  , 

139 

EP1  = 

O.lOOOOE-01 , 

140 

EP2S-0.10000E-01 

141 

AERO= 

0.0 

, 142 

VYW  = 

0.0  , 

143 

OMXrts 

0.0  , 

144 

OMZW  = 

0.0  , 

145 

RHOAs 

0.1147UE-06 

146 

CYP  = 

0.0 

, 147 

CYR  = 

0.0  , 

l48 

CZAL  = 

0.0  , 

149 

CZQ  = 

0.0  , 

150 

CLP  = 

0.0 

151 

CLR  = 

0.0 

, 152 

CMAL  = 

0.0  , 

153 

CMO  s 

0.0  , 

154 

CNP  = 

0.0  , 

155 

CNR  s 

0.0 

156 

SF  = 

4216.0 

, 157 

VLEN= 

179.13  , 

158 

REWVs 

1094. U , 

159 

s 

0.0  , 

160 

3 

0.0 

161 

= 

0.0 

• 162 

= 

Q.O  , 

163 

s 

0.0  , 

164 

s 

0.0  , 

165 

3 

0.0 

166 

B 

0.0 

, 167 

= 

0.0  , , 

168 

s 

0.0  , 

169 

SNT  = 

73.000  , 

170 

SNSOs 

75.000 

171 

SNS1  = 

75.000 

, 172 

SNSW3 

2.0000  , 

173 

DISTs 

0.0  , 

174 

PL  = 

0.0  . 

175 

TSCP* 

0.25000 

176 

= 

0.0 

, 177 

3 

0.0  , 

178 

s 

0.0  , 

179 

= 

0.0  , 

180 

PASSs 

4.0000 

101 

= 

0.0 

, 182 

sil  = 

0.14000  , 

183 

SI2s 

0.14000  , 

184 

SI3= 

0.19000  , 

185 

SI43 

0.19000 

186 

s 

0.0 

, 187 

3 

0.0  , 

188 

= ' 

0.0  , 

189 

s 

0.0  , 

190 

3 

0.0 

191 

s 

0.0 

, 192 

MTOBb 

1.0000  , 

193 

DCSWs 

0.0  , 

194 

LDFs 

0.0  , 

195 

LORFs 

0.0 

196 

EK1  = 

0.0 

, 197 

EK2= 

0.0  , 

198 

BMPL  = 

0.0  , 

199 

BMPSs 

0.0  , 

200 

BMPHs 

1.5000 

201 

XB  = 

0.0 

, 202 

APF1  = 

1.2400  , 

203 

APF2S-0.19800E-03, 

204 

APRls 

1.1300  , 

205 

APR2  = 

-0.11900E-03 

206 

MUSF  = 

0.80000 

, 207 

MUSH  = 

0.82000  , 

208 

BCONs 

0. 300006-01, 

209 

FCSWs 

0.0  , 

210 

s 

0.0 

211 

3 

0.0 

, 212 

3 

0.0  , 

213 

s 

0.0  , 

214 

s 

0.0  , 

215 

s 

0.0 

216 

3 

0.0 

, 217 

3 

0.0  , 

218 

s 

0.0  , 

219 

FEEl* 

0.0  , 

220 

FEE2= 

0.0 

221 

THE1  = 

0.0 

, 222 

THE2= 

0.0  , 

223 

s 

0.0  , 

224 

s 

0.0  , 

225 

s 

0.0 

226 

c 

0.0 

, 227 

3 

0.0  , 

228 

= 

0.0  , 

229 

s 

0.0  , 

230 

s 

0.0 

231 

Hl  = 

400.00 

, 232 

h2  = 

400.00  , 

233 

LAMOs 

1.0000  , 

234 

s 

0.0  , 

235 

= 

0.0 

236 

3 

0.0 

, 237 

3 

0.0  , 

238 

BRls 

1.9000  , 

239 

BR2  = 

1.9000  , 

240 

6R3s 

1.0000 

241 

8R4= 

1.0000 

» 242 

KCFs 

-0.37200E-04, 

243 

KCRs- 

■0. 220006-04, 

244 

KSRs 

0.20000E-05, 

245 

RBls 

-0.67850E-03 

246 

RB2= 

0.0 

, 247 

RB3  = 

1.4500  , 

248 

RB4S 

0.169716-06, 

249 

AFKl=-0.24480E-02. 

250 

AFK2S 

0.28560E-02 

251 

AFK3= 

1.0200 

, 252 

ARK1  = 

-0. 15600E-02, 

253 

ARK2  = 

0.114966-02, 

254 

ARK3  = 

1.4400  , 

255 

OFCOs 

0.0 

256 

0FCl=-0. 10416E-02.  257 

OFC2=-0.70080E-02, 

258 

0FC3S 

-5.2200  , 

259 

ORCOs 

0.0  , 

260 

ORCls 

-0.61920E-03 

261 

ORC2=-0.604U0E-02,  262 

ORC3  = 

-5.7600  , 

263 

CPOFs 

0.0  , 

264 

CPlFs 

0.0  , 

265 

CP2FS 

0.0 

266 

CP0R= 

0.29000 

, 267 

CP1R= 

0.30000E-01 . 

268 

CP2RS 

0.0  , 

269 

CROFs 

0.0  , 

270 

CRlFs 

0.0 

271 

CR2F  = 

0.0 

, 272 

CR0R  = 

0.13000  , 

273 

CRlRs 

0.300006-01 , 

274 

CR2R= 

0.0  , 

275 

s 

0.0 

276 

3 

0.0 

, 277 

6MPN= 

0.0  , 

278 

TOBOs 

0.0  , 

279 

TQBIs 

0.0  , 

280 

3 

0.0 

281 

3 

0.0 

, 282 

3 

0.0  , 

283 

s 

0.0  , 

284 

HFC  = 

0.0  , 

285 

HRCs 

3.5600 

286 

DRSWn 

0.0 

, 287 

axle= 

2.0000  , 

288 

DUAL* 

0.0  , 

289 

TIRE* 

4.0000  , 

290 

ROT  = 

1.0000 

291 

RAO  = 

-1441.2 

, 292 

RAl  = 

16.440  , 

293 

RA2  s 

3470.7  , 

294 

RA3  s 

1.1700  , 

295 

RA4  s 

4139.5 
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1 

MS  = 

8.8200 

9 

2 

MUF* 

0.51000  , 

3 

MUR  = 

0.82000  t 

4 

ZF  = 

10.900  , 

5 

ZR  = 

10.800 

6 

A = 

50,500 

9 

7 

B = 

67.500  , 

8 

TF* 

59.800  1 

9 

TR  = 

61.800  t 

10 

TSR  = 

47.000 

1 1 

IX  = 

3832.0 

9 

12 

IY  = 

24003.  , 

13 

IZ» 

24311.  t 

14 

1X2  = 

530,00  * 

15 

IR  = 

550.00 

16 

X 

0.0 

9 

17 

RF  = 

40400,  t 

18 

STOP= 

10.000  « 

19 

AKFl* 

105.00  . 

20 

AKF2  = 

105.00 

AKR3  = 

120.00 

9 

22 

AKR4x 

120.00  t 

23 

S 

0.0  • 

24 

RR  = 

-51011,0  f 

25 

CF1P  = 

40,000 

26 

CF2P  = 

40,000 

9 

27 

CR3P= 

38.000  , 

28 

CR4P  = 

38.000  • 

29 

ZBA5  = 

0.0  t 

30 

KRSs 

0.20000E- 

31 

RWz 

13,200 

9 

32 

SCAL  = 

1000.0  . 

33 

FOT* 

0,75000  • 

34 

A0  = 

2701.0  . 

35 

Al  = 

10.140 

36 

A2  = 

2533.0 

9 

37 

A3* 

1.3000  , 

38 

A4  = 

4591.0  f 

39 

TIR  3 

0.0  , 

40 

TOR  = 

0.0 

41 

KSC» 

8000.0 

9 

42 

NG  = 

14,200  , 

43 

3 

0.0  • 

44 

B 

0.0  • 

45 

3 

0.0 

46 

= 

0.0 

9 

47 

IFW* 

6.4000  « 

48 

IF  = 

550,00  t 

49 

IWF* 

9.4000  . 

50 

IWR  = 

9.4000 

51 

IOR  = 

0.70000 

9 

52 

ARR* 

2.7100  f 

53 

TSF  = 

0.0  • 

54 

KFS  = 

0.0  • 

55 

PT  = - 

0.66000 

56 

YSAl  = 

4.5900 

9 

57 

YSA2* 

-4,5900  * 

58 

PHSl=-0. 13090  . 

59 

PHS2  = 

0.13090  t 

60 

CTSWs 

1.0000 

61 

IDF  = 

0.0 

9 

62 

ARF* 

0.0  . 

63 

P-IN* 

0.0  t 

64 

Q-IN= 

0.0  , 

65 

R-IN= 

0.0 

66 

U-IN  = 

40,000 

9 

67 

V-IN* 

0.0  , 

68 

W-IN  = 

0.0  « 

69 

X-IN  = 

0.0  , 

70 

Y-IN* 

0.0 

71 

Z-IN  = 

-23.372 

9 

72 

THIN=-0. 13596E-01 t 

73 

PHIN  = 

0,0-  . 

74 

PSIN* 

0.0  , 

75 

DT  = 

0.50000E 

76 

TN  = 

5,0000 

9 

77 

KT1  = 

1450.0  , 

78 

KT2  = 

1450.0  ♦ 

79 

KT3  = 

1450.0  t 

80 

KT4  = 

1450.0 

81 

RPS1  = 

0.0 

9 

82 

RPS2= 

0,0  , 

83 

RPS3  = 

0.0  1 

84 

RPS4  = 

0.0  . 

85 

Bl=- 

O.330OOE 

86 

82= 

0.0 

9 

87 

B3  = 

1.2280  * 

88 

84  = 

0.75900t-07* 

89 

DIDT* 

0.0  . 

90 

D2DT* 

0.0 

91 

D3DT  = 

0,0 

9 

92 

oelf= 

-1.1000  • 

93 

DELR  = 

>1.0800  f 

94 

OEL3  = 

0.0  . 

95 

PHDT  = 

0.0 

96 

PHIR  = 

0.0 

9 

97 

OFwl  = 

0.0  , 

98 

0FW2= 

0.0  • 

99 

U1PR  = 

0.0  r 

100 

U2PR3 

0.0 

101 

U3PR  = 

0.0 

9 

102 

U4PR* 

0.0  . , 

103 

S1PR  = 

0.0  • 

104 

S2PR  = 

0,0  , 

105 

S3PR  = 

0.0 

106 

S4PR  = 

0.0 

9 

107 

PPRT* 

1.0000  , 

IO8 

FREQ* 

0.50000  t 

109 

RWSF  = 

15.000  t 

110 

TOMXb 

0.0 

111 

KTQ  = 

0.0 

9 

112 

VC  = 

0.0  • 

113 

MTSW  = 

1.0000  f 

114 

OSWM  = 

62,000  f 

115 

TST  = 

1.0000 

116 

DSLP  = 

0.50000 

9 

117 

CGAM* 

3.0000  , 

118 

CS  = 

3.0000  , 

119 

TOR  = 

0,0  1 

120 

TQF  = 

0.0 

121 

PFL  = 

300.00 

9 

122 

Tl  = 

0.0  , 

123 

DSW  = 

0.0  1 

124 

3 

0.0  • 

125 

ISW5  = 

0.0 

126 

SW15  = 

0.0 

9 

127 

POSH* 

0.0  . 

128 

VTPS= 

3.0000  t 

129 

VHTP  = 

0.0  , 

130 

AMCR* 

0.60000E 

131 

ESP  = 

16,000 

9 

132 

KSl1  = 

55900.  • 

133 

KSL2= 

55900.  , 

134 

AA1  = 

6.6200  • 

135 

AA2* 

6.6200 

136 

CCR  = 

11,000 

9 

137 

CFCR* 

54.000  , 

138 

AP  = 

5.2000  , 

139 

EPl  = 

0,45000  t 

140 

EP2=-0, 45000 

141 

AERO* 

0.0 

9 

142 

VYW  = 

88.000  , 

143 

OMXWs. 

0.30000E-01 * 

144 

OMZW  = 

0.40000E-OU 

145 

RHOA  = 

O.IOOOOE 

146 

CYP  = 

0.  lOOOOE 

OO9 

147 

CYR  3 

O.IOOOOE-Olf 

148 

CZAL  = 

O.lOOOOE-02* 

149 

CZQ  = 

0.60000E-02* 

150 

CLP  * 

O.IOOOOE 

151 

CLR  = 

O.IOOOOE 

-029 

152 

CMAL* 

O.lOOOOE-03, 

153 

CMQ  = 

0.10000£-03f 

154 

CNP  = 

0.30000E-03t 

155 

CNR  3 

0.40000E 

156 

SF  = 

500.00 

9 

157 

VLEN* 

0.0  , 

158 

REWV  = 

0.0  « 

159 

3 

0.0  • 

160 

3 

0.0 

161 

X 

0.0 

9 

162 

= 

0.0  , 

163 

s 

0.0  « 

164 

B 

0.0  , 

165 

3 

0,0 

166 

s 

0.0 

9 

167 

= 

0.0  , 

168 

= 

0.0  t 

169 

SNT  = 

73.000  t 

170 

SNS0  = 

73.000 

171 

SNSl* 

73.000 

9 

172 

SNSW  = 

2.0000  ' » 

173 

DIST  = 

0.0  • 

174 

PL  = 

0.0  t 

175 

TSCP* 

0.25000 

176 

& 

0.0 

9 

177 

3 

0,0  , 

178 

= 

0.0  . 

179 

3 

0.0  , 

180 

PASS  = 

4.0000 

181 

= 

0,0 

9 

182 

511  = 

0,17000  « 

183 

512  = 

0.17000  • 

184 

SI3* 

0,17000  t 

185 

SI4* 

0,17000 

186 

= 

0.0 

9 

187 

3 

0.0  , 

188 

3 

0.0  * 

189 

3 

0.0  , 

190 

3 

0.0 

191 

= 

0.0 

9 

192 

MTOB* 

1.0000  , 

193 

DCSw  = 

0.0  1 

194 

LDF  = 

0.0  , 

195 

LDRF  = 

0.0 

19b 

EKl* 

0.0 

9 

197 

Ek2  = 

0.0  . 

198 

bmpl= 

0.0  • 

199 

BMPS* 

0.0  f 

200 

bmph= 

1.5000 

201 

XB  = 

0.0 

9 

202 

APF1  = 

0,94000  « 

203 

APF2=-0.80000E-04. 

204 

APRl* 

0.94000  • 

205 

APR2=-0.80000E 

206 

MUSF* 

0.65000 

9 

207 

MUSR  = 

0,65000  « 

208 

bcon= 

0.30000E-01 * 

209 

FCSW* 

0,0  , 

210 

s 

0.0 

211 

s 

O.O 

9 

212 

3 

0.0  , 

213 

= 

0.0  • 

214 

3 

0.0  . 

215 

s 

0.0 

216 

= 

0.0 

9 

217 

3 

0.0  , 

218 

3 

0.0  • 

219 

FEEl* 

0.0  f 

220 

FEE2  = 

0.0 

221 

THE1  = 

0.0 

9 

222 

THE2  = 

0.0  , 

223 

3 

0.0  « 

224 

3 

0.0  , 

225 

= 

0.0 

226 

= 

0.0 

9 

227 

3 

0.0  , 

228 

3 

0.0  t 

229 

3 

0.0  , 

230 

s 

0.0 

231 

Hl  = 

400.00 

9 

232 

H2  = 

400.00  , 

233 

LAMD» 

1.0000  « 

234 

3 

0.0  • 

235 

s 

0.0 

236 

s 

0.0 

9 

237 

3 

0.0  t 

238 

BR1  = 

1.0000  t 

239 

BR2  = 

1.0000  f 

240 

0R3c 

0.67000 

241 

8R4* 

0.67000 

9 

242 

KCF  = 

-0.39300E-04, 

243 

KCR= 

-0.33200E-04. 

244 

KSR= 

0.17500E-05. 

245 

RB1*-0.33000E 

246 

RB2  = 

0.0 

9 

247 

RB3  = 

1.2280  , 

248 

RB4  = 

0.75900E-07* 

249 

AFK1=-0.31800E-02* 

250 

AFK2  = 

0.34900E 

251 

AFK3= 

1.4040 

9 

252 

ARK1  = 

-0.31800E-02. 

253 

ARK2  = 

0,34900E-02» 

254 

ARK3* 

1,4040  • 

255 

OFCOs 

0.0 

256 

OFCl* 

-0.15000E 

-029 

257 

OFC2=-0.52440E-02* 

258 

0FC3= 

-5.5920  . 

259 

ORCO* 

0.0  . 

260 

ORC1=-0.15000E 

261 

0RC2  = 

-0.52440E 

-029 

262 

ORC3  = 

-5,5920  , 

263 

CP0F  = 

-0.13000  t 

264 

CPIF* 

-0.30000E-01* 

265 

CP2F  = 

0.0 

266 

CPORs 

0.15000 

9 

267 

CPIR* 

0. 15000E-01 , 

268 

CP2R  = 

0.0  t 

269 

CROFs 

0.89000E-01. 

270 

CR1F= 

O.IOOOOE 

271 

CR2F  = 

0.0 

9 

272 

CR0R  = 

0.0  , 

273 

CR1R= 

0.0  • 

274 

CR2R  = 

0.0  1 

275 

8 

0,0 

276 

3 

0.0 

9 

277 

BMPN= 

0.0  , 

278 

TQBO* 

0.0  1 

279 

TQBl* 

0.0  , 

280 

3 

0.0 

281 

= 

0.0 

9 

282 

3 

0.0  , 

283 

3 

0.0  • 

284 

HFC  = 

2.7000  , 

285 

HRC  = 

3.9000 

286 

DRSW  = 

0.0 

9 

287 

axle= 

1.0000  1 

288 

DUAL  = 

0.0  f 

289 

TIRE* 

4.0000  1 

290 

ROT  3 

0,75000 

291 

RAO  = 

2701,0 

9 

292 

RAl  3 

10.140  , 

293 

RA2  = 

2533.0  * 

294 

RA3  = 

1.3000  f 

295 

RA4  3 

4591.0 

432 


PARAMETER 
1 MS= 

»^ALUES  - MODEL 
24,609  , 

C - 

2 

vehicle 

MUF  = 

MODEL  * hlNNABAGO 
1.7210  , 3 

MOTOR 

MUR= 

home  type  a 
2.8880  , 

(DODGE 

4 

RM  400/150,5"  WB) 
ZF=  36.300  , 

5 

ZRs 

36.190 

6 

As 

99.410  t 

7 

8 = 

59.090  » 

8 

TF  = 

66.150  , 

9 

TR= 

66.120  , 

10 

TSRs 

41.240 

11 

IX  = 

40300.  . 

12 

IY  = 

0.21910E  06, 

13 

IZ  = 

0.21650b  06, 

14 

IXZ  = 

7100.0  , 

15 

1R  = 

2400.0 

16 

z 

0.0  « 

17 

RF  = 

0.15300E  06, 

18 

STOPS 

lO.OOo  , 

19 

AKFl® 

450.00  , 

20 

AKF2  = 

450.00 

21 

AKR3= 

875.00  « 

22 

AKR4  = 

875.00  , 

23 

z 

0.0  , 

24 

RRs 

0.15300E  06, 

25 

CFlPs 

100.00 

26 

CF2P= 

100.00  • 

27 

CR3P  = 

150.00  , 

26 

CR4P  = 

150.00  , 

29 

ZBASs 

0.0  , 

30 

KRS=- 

O.lOOOOE-01 

31 

RW  = 

16.8/0  , 

32 

SCAL  = 

4000.0  , 

33 

FOT  = 

1.0000  , 

34 

40  = 

635.20  , 

35 

Al  = 

1 1.980 

36 

A2= 

5447.9  , 

37 

A3= 

1.8900  , 

38 

A4  = 

6306.2  , 

39 

TIR  = 

56.620  , 

40 

TOR  ® 

75.620 

41 

KSC  = 

8000.0  , 

42 

N6= 

17.500  , 

43 

z 

0.0  , 

44 

z 

0.0  , 

45 

z 

0,0 

46 

z 

0.0  t 

47 

IFW  = 

27.000  , 

40 

IF  = 

1500.0  , 

49 

IWF  = 

21.300  , 

50 

IWRz 

48.000 

51 

IOR  = 

1.3000  , 

52 

ARH  = 

4.5600  , 

53 

TSF  = 

31.000  , 

54 

KFS  = 

0.70000E-01 , 

55 

PTs 

1.3100 

56 

YSA1  = 

6.0800  « 

57 

YSA2  = 

-6.0800  , 

50 

PHSl=-0. 1221 7 , 

59 

PHS2= 

0.12217  , 

60 

CTSWs 

1.0000 

61 

1DF  = 

0.0  t 

62 

ARF  = 

0.0  , 

63 

P-IN  = 

0.0  , 

64 

Q-1N  = 

0.0  , 

65 

R-lNs 

0,0 

66 

U-IN= 

40.000  • 

67 

V-IN  = 

0.0  , 

68 

W-IN= 

0.0  , 

69 

X-INs 

0.0  , 

70 

Y-IN  = 

0.0 

71 

Z-IN= 

-52.478  , 

72 

THIN=- 

0.77222E-04, 

73 

PHIN  = 

0.(7  , 

74 

PSINs 

0.0  , 

75 

DT  = 

O.lOOOOE-01 

76 

TN= 

5.0000  t 

77 

KT1  = 

3040.0  , 

70 

KT2  = 

3040.0  , 

79 

KT3  = 

3040.0  , 

80 

KT4z 

3040.0 

01 

RPS1  = 

0.0  f 

82 

RPS2  = 

0.0  , 

83 

RPS3  = 

0.0  , 

64 

RPS4S 

0.0  , 

85 

Bl=- 

0.23600E-03 

86 

82  = 

0.0  , 

87 

63  = 

1.3200  , 

80 

B4  = 

0.29700E-07, 

69 

DIDT® 

0.0  , 

90 

D2DT  = 

0.0 

91 

D30T  = 

0.0  « 

92 

DELF  = 

0.0  , 

93 

OELR= 

0.0  , 

94 

DEL3= 

0.0  , 

95 

PHDTs 

0.0 

96 

PHIRs 

0.0  , 

97 

OFWl  = 

0,0  , 

98 

DFW2= 

0.0  , 

99 

UlPRs 

0.0  , 

100 

U2PRS 

0,0 

101 

U3PR  = 

0.0  • 

102 

U4PR  = 

0.0  ■ , 

103 

SlPRs 

0.0  , 

104 

S2PRS 

0.0  , 

105 

S3PRs 

0.0 

106 

S4PR  = 

0.0  1 

107 

PPRT  = 

1.0000  , 

106 

FREQS 

0.40000  , 

109 

RWSFs 

20,000  , 

110 

TQMXz 

4428.0 

111 

KTQ= 

738.00  t 

112 

VC  = 

0.0  , 

113 

MTSWs 

l.QOOO  , 

114 

DSWMs 

62,000  , 

115 

TSTz 

1.0000 

116 

OSLP  = 

0.50000  t 

117 

CGAM  = 

3.0000  , 

118 

cs= 

3.0000  , 

119 

TORS 

0,0  , 

120 

TQF  = 

0,0 

121 

PFL  = 

300.00  , 

122 

Tl  = 

0.0  , 

123 

OSWs 

0.0  , 

124 

z 

0.0  , 

125 

ISW5  = 

0,0 

126 

SW15  = 

0.0  , 

127 

PUSW  = 

0.0  , 

128 

VTPSs 

3.0000  , 

129 

VHTPs 

0.0  , 

130 

AMCRs 

0.78000E-01 

131 

ESP= 

0.27900  , 

132 

KSl1  = 

0.15000E  06, 

133 

KSL2  = 

0.15000E  06, 

134 

AAl® 

8,0200  , 

135 

AA2  = 

8,0200 

136 

CCR  = 

11.000  , 

137 

CFCR  = 

120.00  , 

138 

ap= 

7.5000  , 

139 

EPl® 

0.90000E-02, 

140 

EP2  = - 

0.90000E-02 

141 

AFRO  = 

0.0  . 

142 

VYW  = 

0.0  , 

143 

OMXWs 

0.0  , 

144 

OMZW® 

0.0  , 

145 

RHOAs 

0.11470E-06 

146 

CYP  z 

0.0  , 

147 

CYR  = 

0.0  , 

148 

czal= 

0.0  , 

149 

CZQ  = 

0.0  , 

150 

CLP  = 

0.0 

151 

CLP  = 

0.0  . 

152 

CMAL  = 

0.0  , 

153 

CMQ  s 

0.0  , 

154 

CNP  s 

0.0  , 

155 

CNR  s 

0,0 

156 

SF  = 

9100.0  f 

157 

VLEN  = 

294.00  , 

158 

REWVs 

1094,0  , 

159 

s 

0.0  , 

160 

z 

0.0 

161 

z 

0.0  , 

162 

= 

0,0  , 

163 

z 

0.0  , 

164 

z 

0.0  , 

165 

z 

0.0 

166 

= 

0.0  , 

167 

= 

0.0  , 

168 

z 

0.0  , 

169 

SNT® 

73.000  , 

170 

SNSOz 

75.000 

171 

SNS1  = 

75.000  . 

172 

SNSW  = 

2.0000  ' , 

173 

DISTs 

0.0  , 

174 

PL  = 

0.0  , 

175 

TSCPs 

0,25000 

176 

= 

0.0  , 

177 

= 

0.0  , 

178 

s 

0.0  , 

179 

z 

0.0  , 

180 

PASSs 

4,0000 

181 

z 

0.0  , 

182 

SI1  = 

0.20000  , 

183 

SI2= 

0.20000  , 

104 

SI3  = 

0.20000  , 

185 

SI4  = 

0.20000 

186 

z 

0.0  , 

107 

z 

0.0  , 

186 

s 

0.0  , 

189 

s 

0.0  , 

190 

z 

0.0 

191 

z 

0.0  , 

192 

MTQB  = 

1.0000  , 

193 

DCSws 

0.0  , 

194 

LOF® 

0.0  , 

195 

LDRFz 

0.0 

196 

EKl=-0. 18000E-02, 

197 

EK2= 

O.iaOOOE-02, 

196 

bmpl= 

0.0  , 

199 

BMPSs 

0.0  , 

200 

BMPHs 

1,5000 

201 

XB  = 

0.0  , 

202 

APF1  = 

1.0400  , 

203 

APF2=-0.75B00£-04, 

204 

APRls 

1.0400  , 

205 

APR2=- 

0.75800E-04 

206 

MUSF  = 

0,72000  , 

207 

MUSR  = 

0.72000  , 

206 

BCONs 

0.30000E-01 , 

209 

FCSWs 

0.0  , 

210 

z 

0,0 

211 

z 

0.0  , 

212 

3 

0.0  , 

213 

z 

0.0  , 

214 

z 

0.0  , 

215 

z 

0.0 

216 

z 

0.0  , 

217 

= 

0.0  , 

218 

z 

0.0  , 

219 

FEEl® 

0.34900E-01 , 

220 

FEE2=- 

0.34900E-01 

221 

THE1  = 

0.69800E-01. 

222 

THE2  = 

0.69800E-01  , 

223 

s 

0.0  , 

224 

s 

0.0  , 

225 

z 

0.0 

226 

= 

0.0  . 

227 

= 

0.0  , 

220 

z 

0.0  , 

229 

z 

0.0  , 

230 

z 

0.0 

231 

Hx  = 

600.00  t 

232 

H2= 

600,00  , 

233 

LAMOs 

0.0  , 

234 

z 

0.0  , 

235 

z 

0.0 

236 

= 

0,0  , 

237 

= 

0.0  , 

238 

BR1  = 

1.1300  , 

239 

BR2® 

1,1300  , 

240 

BR3  = 

1.0000 

241 

0R4  = 

1.0000  • 

242 

KCF=- 

0.20000E-04, 

243 

KCR  = 

-0.20000E-04, 

244 

KSR® 

0.15000E-05, 

245 

RB1=-0.23600E-03 

246 

RB2  = 

0.0  , 

247 

RB3* 

1,3200  , 

248 

RB4= 

0.29700E-07, 

249 

AFKls-0, 15700E-02, 

250 

AFK2  = 

0.14800E-02 

251 

AFK3= 

1,6080  , 

252 

ARKl=-0,15700E-02. 

253 

ARK2  = 

0.14800E-02, 

254 

ARK3  = 

1.6080  , 

255 

OFCOs 

0.0 

256 

OFC1=-0.62400E-03* 

257 

0FC2  = 

0.24000E-02, 

258 

OFC3  = 

-9.1320  , 

259 

ORCO® 

0.0  , 

260 

ORC1S-0.62400E-03 

261 

ORC2= 

0.240O0E-02* 

262 

ORC3  = 

-9.1320  , 

263 

CP0F  = 

0.0  , 

264 

CPIF® 

0,0  , 

265 

CP2FS 

0.0 

266 

CPORs 

0.0  « 

267 

CP1R  = 

0.0  , 

260 

CP2RS 

0.0  , 

269 

CROFs 

0.0  , 

270 

CRlFz 

0.0 

271 

CR2F  = 

0.0  , 

272 

CR0H  = 

0.0  , 

273 

CRlRs 

0.0  , 

274 

CR2RS 

0.0  , 

275 

z 

0.0 

276 

z 

0.0  . 

277 

8MPN= 

0.0  , 

278 

TQBOs 

0.0  , 

279 

TOBls 

0.0  , 

280 

z 

0.0 

281 

= 

0.0  , 

282 

= 

0.0  , 

283 

z 

0.0  , 

284 

HFC® 

0.0  , 

285 

HRCs 

0,0 

286 

DRSW  = 

0.0  . 

287 

axle= 

0.0  , 

288 

DUAL® 

1.0000  , 

289 

TIRES 

4.0000  , 

290 

ROT  s 

1 .0000 

291 

RAO  = 

635.20  , 

292 

RAl  = 

11.980  , 

293 

RA2  = 

5447,9  , 

294 

RA3  = 

1.8900  , 

295 

RA4  z 

6306,2 
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5,  List  of  APL  Operational  Vehicle  Data  Decks 


Vehicle 


Suspension 
Front  Rear 


VW  Super  Beetle  (71)  I 

Dodge  Coronet  (71)  I 

Pontiac  Trans  Am  (71)  I 

Chevrolet  Brookwood  Station  Wagon  (71)  I 
Chevrolet  Caprice  Station  Wagon  (73)  I 

F-250  Pickup  with  1 1 foot  Open 
Road  Camper  (74)  I 

VW  Campmobile  (74)  I 

Winnebago  Motor  Home  Type  A (74) 

(Dodge  Rm  400/158.5"  WB)  S 

Open  Road  Motor  Home  Type  C (74) 

(Dodge  MB  300/127"  WB)  I 

Ford  Econoline  Van  (69)  I 

Ford  F-250  Pickup  (74)  I 

CMC  Intercity  Bus  (66)  S 

White  Tractor  (74)  S 

Jeep  Wagoneer  (74)  S 

Chevrolet  NOVA  (74)  I 

Chevrolet  NOVA  (75)  I 

Ford  Torino  (75)  I 

Ford  Mustang  (71)  I 


I 

S 

S 

s 

s 

s 

I 


S,D 


S,D 

S 

S 


S,D 

S,D 

S 

S 

S 

S 

S 


I = independent 
S = solid 

D = dual  tires,  one  rear  axle 
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APPENDIX  F 


PERFORMANCE  COMPARISON  VARIABLE  GRAPHS 
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.K::^v;..,:’^:;^dL'< 

o,  ..*;•  .;  ^ : 


1.  VHTP  #1  - STRAIGHT  LINE  BRAKING 

A - Average  Longitudinal  Deceleration  from 
35  mph  to  10  mph  (GEES) 

Pg  - Brake  Line  Pressure  (PSI) 
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flX-flVG.  LONG.  DECEL.-GEES 


FIG.  1 ***  fiVG.  LONG.  DECEL.  VS.  BRAKE  LINE  PRESSURE 

(CRLSPRN.  O.E.  TIRES.  STRIGHT  LINE  BRAKING) 


• - OOOOE  CORONET 
a - CHEVY  BROOKHOOO 
A - PONTIAC  TRANS  AM 
X - VH  SUPERBEETLE 

18  JUN  76 
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2.  VHTP  #2  - BRAKING  IN  A TURN 


A - Average  Longitudinal  Deceleration  from 


X 


35  mph  to  10  mph  (GEES) 


Pg  “ Brake  Line  Pressure  (PSI) 

BETADOT  - Peak  Vehicle  Sideslip  Angle  Rate 
(RADIANS/SEC) 

R (1/R)  - Average  Path  Curvature  Ratio  Relative 


0 


to  Initial  Turn 
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flX-flVG.  LONG.  DECEL.-GEES 


FIG.  2 mmm  RVG.  LONG.  DECEL.  VS.  BRAKE  LINE  PRESSURE 


(CflLSPflN.  O.E.  TIRES.  BRAKING  IN  A TURN) 


• - OOOOE  CORONET 
a - CHEVY  BROOKHOOO 
A - PONTIAC  TRRN8  RM 
- VH  SUPERBEETLE 


X 
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BETflDOT-PEflK  SIDESLIP  RATE  - RRDIflNS/SEC 


FIG.  3 mmm  SIDESLIP  RATE  VS-  RVG.  LONG.  DECEL . 

(CALSPRN.  O.E.  TIRES.  BRAKING  IN  A TURN) 


AX-LONG.  DECEL. -GEES 

• - OOOOE  CORONET 
a - CHEVY  BROOKHOOO 
A - PONTIAC  TRANS  AH 
X - VH  SUPERBEETLE 

18  JUN  76 
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RO(l/R)-fiVG.  PATH  CURVATURE  RATIO 


FIG.  4 mmm  AVG.  PATH  CURV.  RATIO  VS.  AVG.  LONG.  DECEL.  mmm 

(CALSPAN.  O.E.  TIRES.  BRAKING  IN  A TURN) 


• - OOOOE  CORONET 
a - CHEVY  BROOKHOOO 
A - PONTIAC  TRANS  AM 
X - VH  SUPERBEETLE 

18  JUN  76 
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3.  VHTP  #3  - TURNING  ON  A ROUGH  ROAD 

f - Roadroughness  Fundamental  Frequency  - 

Determined  by  Spacing  of  the  Disturbance 
Elements  in  Each  Grid  (HZ) 

R-(l/R)  - Average  Path  Curvature  Ratio  Relative 
to  the  Initial  Turn 

BETADOT  - Peak  Vehicle  Sideslip  Angle  Rate 
(RADIANS/SEC) 


i 

’/ 

( 
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BETflDOT-PEflK  SIDESLIP  RfiTE  - RflDIflNS/SEC 


FIG.  5 »mm  SIDESLIP  RfiTE  VS.  ROfiDROUGHNESS  FREQ,  mmm 
(CfiLSPfiN.  O.E.  TIRES.  TURNING  ON  fi  ROUGH  ROfiD) 


• - OOOOE  CORONET 

• <-  CHEVY  BROOKHOOD 
A - PONTIAC  TRANS  AM 
X - VH  SUPERBEETLE 

18  JUN  76 
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RO(l/R)-flVG.  PATH  CURVATURE  RATIO 


FIG.  6 mmm  AVG-  PATH  CURVATURE  RATIO  VS.  ROADROUGHNESS  FREQ,  mmm 


(CALSPAN.  O.E.  TIRES.  TURNING  ON  A ROUGH  ROAD) 


12.0000 


10.0000 


8.0000 


6.0000 


4.0000 


2.0000 


0.0000 


10  11  12 
F-ROADROUGHNESS  FREQ. -HZ 


OOOOE  CORONET 
CHEVY  BROOKHOOO 
PONTIRC  TRRNS  RH 
VH  SUPERBEETLE 


- 

- 

- 

- 

- 

i 





i 

h ■ 
1 

1 

3 

1 

--HI 

1 

13 


14 


18  JUN  76 
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4.  VHTP  #4  - TRAPEZOIDAL  STEER 
A - Peak  Lateral  Acceleration  (GEES) 

y 

SIGMA  - Normalized  Steer  Angle  (DEGREES) 

R - Peak  Yaw  Rate  (RADIANS/SEC) 

Rg(l/R)  - Path  Curvature  Response  Averaged  Over 
Two  Seconds  and  Ratioed  to  a Reference 
Path  Curvature  Deriving  from  a Steady 
Turn  of  40  mph  and  l.Og  A^ 

BETADOT  - Peak  Vehicle  Sideslip  Angle  Rate 
(RADIANS/SEC) 

BETA  - Peak  Vehicle  Sideslip  Angle  (RADIANS) 
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BETA  - PEAK  SIDESLIP  ANGLE  - RADIANS 


FIG.  7 mmm  SIDESLIP  ANGLE  VERSUS  NORMALIZED  STEER  ANGLE  mmm 

(CALSPAN.  O.E.  TIRES.  TRAPEZOIDAL  STEER) 


• - OOOOE  CORONET 
a - CHEVY  BROOKHOOO 
A - PONTIRC  TRRN8  RH 
X - VH  SUPERBEETLE 

18  JUN  76 
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RS( 1/R)-N0RM.  PATH  CURV.  RATIO 


FIG.  8 mmm  NORM.  CURVATURE  RATIO  VS.  NORM.  STEER  ANGLE  *** 


(CALSPANp  O.E.  tires,  trapezoidal  STEER) 


• - DOOOE  CORONET 

• - CHEVY  BROOKHOOD 
A - PONT IRC  TRRNS  RM 
X - VH  SUPERBEETLE 

18  JUN  76 
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RY-PEflK  LRTERflL  RCCELERRTION-QEES 


FIG.  9 mmm  LRTERRL  RCCECERRTION  VS.  NORM.  STEER  RNGLE  mmm 


(CRLSPRN.  O.E.  TIRES.  TRRPEZOIDRL  STEER) 


• - OOOOE  CORONET 
a - CHEVY  BROOKHOOO 
A - PONTIAC  TRANS  AH 
K - VH  SUPERBEETLE 

18  JUN  76 
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PEfiK  YflH  RFITE  - RflDIflNS/SEC 


FIG.  10  mmm  YflW  RATE  VERSUS  NORM.  STEER  ANGLE  mmm 


(CALSPAN.  O.E.  TIRES.  TRAPEZOIDAL  STEER) 


SIGMA-NORM.  STEER  ANGLE 


• - OOOOE  CORONET 
a ~ CHEVY  BROOKHOOO 
A > PONTIAC  TRANS  AH 
X - VH  SUPERBEETLE 

18  JUN  76 
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BETflDOT-PEflK  SIDESLIP  RATE  - RRDIflNS/SEC 


FID.  11  w*«  SIDESLIP  RATE  VERSUS  NORM-  STEER  ANGLE 

(CALSPAN.  O.E.  TIRES.  TRAPEZOIDAL  STEER) 


• - DOOOE  CORONET 
a - CHEVY  BROOKHOOD 
A - PONTIRC  TRRN8  RH 
X - VH  SUPERBEETLE 

18  JUN  76 
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BETflDOT-PERK  SIDESLIP  RATE  - RflDIflNS/SEC 


FIG.  12  mmm  SIDESLIP  RATE  VERSUS  NORM.  PATH  CURVATURE  RATIO  mmm 

(CALSPAN.  O.E.  TIRES.  TRAPEZOIDAL  STEER) 


• - OOOOE  CORONET 
a - CHEVY  BROOKNOOO 
A - PONTIAC  TRANS  AM 
X - VH  SUPERBEETLE 

18  JUN  76 


453 


5.  VHTP  #5  - SINUSOIDAL  STEER 

DEL  PSI  - Vehicle  Heading  Angle  Deviation 
After  3.4  Seconds  (RADIANS) 

SIGMA  - Normalized  Steer  Angle  (DEGREES) 

DEL  - Lane  Change  Deviation  from  "IDEAL"  Lane 
Change  Displacement  (FEET) 

BETA  - Peak  Vehicle  Sideslip  Angle  (RADIANS) 
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DEL  PSI-HEfiDIND  fiNGLE  DEVIflTION-RflDIflNS 


FIG.  13  ***  HERDING  RNGLE  DEV.  VS.  NORM.  STEER  RNGLE  *** 

(CRLSPRN,  O.E.  TIRES*  SINUSOIDRL  STEER-45  MPH) 


• - DODGE  CORONET 
a - CHEVY  BROOKMOOD 
A - PONTIAC  TRANS  AH 
X - VH  SUPERBEETLE 

18  JUN  76 
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FIG.  14  mmm  LANE  CHANGE  DEV.  VS.  NORM.  STEER  ANGLE  **11 


(CALSPAN.  O.E.  TIRES.  SINUSOIDAL  STEER-45  MPH) 


• - OODOE  CORONET 
a - CHEVY  BROOKHOOO 
A - PONTIRC  TRRN8  RH 
X - VH  SUPERBEETLE 

18  JUN  76 


BETR  - PERK  SIDESLIP  RNOLE  - RRDIRNS 


FIG.  15  mmm  SIDESLIP  RNGLE  VS.  LRNE  CHRNGE  DEV.  mmm 
(CRLSPRN.  O.E.  TIRES.  SINUSOIDRL  STEER-45  MPH) 


• - DODOE  CORONET 

a - CHEVY  BROOKHOOO 

* - PONTIAC  TRANS  AH 
X - VH  SUPERBEETLE 

18  JUN  76 
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BETA  - PERK  SIDESLIP  ANGLE  - RADIANS 


FIG.  16  «*«  SIDESLIP  ANGLE  VS.  NORM.  STEER  ANGLE  *** 

(CALSPRN,  O.E.  TIRES.  SINUSOIDAL  STEER-45  MPH) 


• > DODOE  CORONET 
. - CHEVY  BROOKHOOD 
A - PONTIAC  TRRNS  RH 
X •*  VM  SUPERBEETLE 

18  JUN  76 
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I 


DEL  PSI-HEflDING  flNDLE  DEVIflTION-RRDIflNS 


FIG.  17  mmm  HERDING  RNGLE  DEV.  VS.  NORM.  STEER  RNGLE 


CCRLSPRN,  O.E.  TIRES.  SINUSOIDRL  STEER-60  MPH) 


• - OOOOE  CORONET 
a - CHEVY  BROOKHOOO 
A - PONTIRC  TRANS  AH 
X - VH  SUPERBEETLE 

18  JUN  76 
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FIG.  18  mmm  LRNE  CHANGE  DEV.  VS.  NORM.  STEER  ANGLE  mmm 
(CALSPAN.  O.E.  TIRES.  SINUSOIDAL  STEER-60  MPH) 


• - OODOE  CORONET 
a - CHEVY  BROOKHOOO 
A - PONTIAC  TRANS  AH 
X - VH  SUPERBEETLE 

18  JUN  76 
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BETA  - PERK  SIDESLIP  ANGLE  - RADIANS 


FIG.  19  mmm  SIDESLIP  ANGLE  VS.  LANE  CHANGE  DEV.  mmm 
(CALSPRN.  O.E.  TIRES.  SINUSOIDAL  STEER-60  MPH) 


• - DODOE  CORONET 

a - CHEVY  BROOKHOOO 

* - PONTIAC  TRANS  AM 
X - VH  SUPERBEETLE 

18  JUN  76 

^ v; 
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BETfi  - PEAK  SIDESLIP  ANGLE  - RADIANS 


FIG.  20  mmm  SIDESLIP  ANGLE  VS-  NORM-  STEER  ANGLE  mmm 
(CALSPAN.  O.E.  TIRES.  SINUSOIDAL  STEER-60  MPH) 


• - OOOOE  CORONET 

• - CHEVY  BROOKHOOO 
A - PONTIAC  TRANS  AM 
X “ VH  SUPERBEETLE 

18  JUN  76 


6.  VHTP  #6  - DRASTIC  STEER  AND  BRAKE 


PHI  - Peak  Roll  Angle  (RADIANS) 

PHIDOT  - Peak  Roll  Angle  Rate  (RADIANS/SEC) 
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PHI-PEflK  ROLL  flNOLE-RflDIflNS 


FIG.  21  mmm  ROLL  ANGLE  VS.  ROLL  ANGLE  RATE  mmm 


(CALSPAN,  O.E.  TIRES,  DRASTIC  STEER  4 BRAKE-50  MPH) 
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0.4 


0-2 


0.0 

0.0  0.2  0.4  0.6  0.8  1.0  1.2 

PHIDOT-ROLL  ANGLE  RATE 

• - OOOOE  CORONET 
. - CHEVY  BROOKHOOO 
^ - PONTIAC  TRANS  AM 
X - VH  SUPERBEETLE 

18  JUN  76 
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PHI-PEflK  ROLL  flNGLE-RflDIRNS 


FIG.  22  »»»  ROLL  ANGLE  VS.  ROLL  ANGLE  RATE  mmm 

(CALSPAN.  O.E.  TIRES.  DRASTIC  STEER  4 BRAKE-60  MPH) 


1.2 


1.0 


0.8 


0.6 


0.4 


0.2 


0.0 

0.0  0.2  0.4  0.6  0.8  1.0  1.2 

PHIDOT-ROLL  ANGLE  RATE 

• - OOOOE  CORONET 

• - CHEVY  BROOKHOOD 
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• - VH  SUPERBEETLE 

18  JUN  76 
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APPENDIX  G 
SIMULATION  OUTPUT 


In  addition  to  the  user/computer  transactions  printed 
on  the  hybrid  operator's  printer,  the  simulation  has  several 
outputs  which  are  normally  available  to  the  user.  The  output 
is  summarized  below: 

(1)  VHTP  comparison  variable  values 

(2)  analog  strip  chart  time  history  recordings 
(sixteen  variables) 

(3)  digital  printout  of  variables  versus  time 
(up  to  fifty  variables) 

(4)  comparison  variable  graphs. 

The  appropriate  VHTP  comparison  variable  values  are 
printed  following  the  execution  of  a VHTP  maneuver.  Typical 
examples  are  presented  in  Figure  G-1. 

Sixteen  channels  of  strip  chart  time  history  recordings 
are  available.  Time  histories  for  the  braking  in  a turn  test 
procedure  are  presented  in  Figures  G-2(a)  and  G-2(b).  The 
variables  are  defined  below: 

Figure  G-2(a)  - 

(1)  longitudinal  deceleration  in  gees  (A  ) , 

(2)  lateral  acceleration  in  gees  (A^) , 


THE  JOHNS  HOPKINS  UNIVERSITY 

APPLIED  PHYSICS  LABORATORY 

LAUREL  Maryland 


(3)  vehicle  yaw  rate  in  radians  per  second  (r) , 

(4)  steering  wheel  input  in  radians  (6^^), 

(5)  vehicle  forward  velocity  in  feet  per  second  (u) , 

(6)  vehicle  side  velocity  in  feet  per  second  (v) , 

(7)  vehicle  sideslip  angle  in  radians  (3)/  and 

(8)  turning  radius  of  curvature  in  feet“^,  (1/R) . 

Figure  G-2 (b)  - 

(1-4)  the  angular  velocities  of  the  right  front, 

left  front,  right  rear,  and  left  rear  wheels 
in  radians  per  second  (w^,  b^2t  ^4' 

spectively)  ; 

(5-7)  the  deflection  from  the  equilibrium  position 
of  the  right  front  wheel,  left  front  wheel, 
and  rear  axle  in  inches  (6^,  62/  6^^,  respec- 
tively) ; 

(8)  the  angular  rotation  of  the  rear  axle  with 

reference  to  the  sprung  mass  in  radians  (cf)  ) . 

R 

The  digital  printout  of  variables  versus  time  is  the 
typical  output  associated  with  digital  simulation.  The  var- 
iables to  be  output  can  be  specified  in  the  program  data  deck 
or  selected  interactively  during  program  execution.  The  time 
interval  for  output  is  also  interactively  selected.  The 
interactive  selection  capability  is  particularly  useful  for 
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simulation  validation  or  studying  unexpected  dynamic  phenomena. 
Any  variable  within  the  simulation  can  be  selected  for  output. 
An  output  example  is  presented  in  Figure  G-3. 

To  aid  in  quick  analysis  of  vehicle  performance,  com- 
puter generated  comparison  variable  plots  are  made  available. 

An  example  plot  for  a trapezoidal  steer  test  procedure  is 
presented  in  Figure  G-4. 
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Fig.  G-1  HVHP  USER'S  INTERACTIVE  CONTROL 


I 
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Fig.  G-2(a)  TIME  HISTORIES  - BRAKING  IN  A TURN 


mm, 
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Fig.  G-2(b)  TIME  HISTORIES  - BRAKING  IN  A TURN 


OPT  ;i;oN 

TRACK 
UNTl  ^nODE 
■)i¥.-K:V:  T A 

ENTER  t:i;me  on /OFF  y step 

.5  l.i  .1 

TYPE  reta;i;n  or  enter  new  array 
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IME 
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PHIDT.I  1) 

PHI . . . ( 1 ) 

ZIMX. . ( 1 » 
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0.50 

0.43077 

0.77597E“02 

-0.11 728 

0.29986E-01 

0.1012 

0.60 

0.35703 

0.29683 

-0.1 0414 

0.29986E-01 

0.1012 

0.70 

0.2B586 
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0.60 
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0.90 
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0.1012 

1 .00 
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0.1012 
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0.29048 

-0.38197 

-0.3031  4E--01 

0.29966E-01 
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OPTION 

Fig.  G-3  DIGITAL  LINE  PRINTER  OUTPUT 
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flY-PEFlK  LATERAL  ACCELERATION-GEES 


LATERAL  RCCECERATION  VS.  NORM.  STEER  ANCLE 


(CALSPRN.  O.E.  TIRES.  TRAPE20IOAL  STEER) 


9 - DODGE  CORONET 
o - CHEVY  BROOKHOOD 
A - PONT  IRC  TRflN5  AM 
, - VH  SUPERBEETLE 

Fig.  G-4  COMPARISON  VARIABLE  PLOT 
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APPENDIX  H 


TIRE  FUNCTION  GRAPHS 

i 

1.  PRESENTED  HERE  ARE  GRAPHS  USED  TO  VALIDATE 
THE  TIRE  MODEL  OUTPUT  FOR  A SET  OF  TIRE 
PARAMETERS 
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SIDE  FORCE  • FSI  -LBS 


FIG.  1 SIDE  FORCE  VS.  SLIP  fiNGLE  WITH  NORMAL  LORD  VARYING 


(F78X14  GY  BB  CPCP  CAMBERED..  SLIP=0.  ) 


SLIP  ANGLE  -DEGREES 


• 

NORMAL 

LOAD 

750.000 

-LBS 

A 

NORMAL 

LOAD 

1125.000 

-LBS 

» 

NORMAL 

LOAD 

= 

1500.000 

-LBS 

B 

NORMAL 

LOAD 

- 

1875.000 

-LBS 

X 

NORMAL 

LOAD 

= 

2250.000 

-LBS 

♦ 

NORMAL 

LOAD 

2625.000 

-LBS 
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SIDE  FORCE  • FSI  -LBS 


FIG.  2 SIDE  FORCE  VS.  SLIP  ANGLE  WITH  NORMAL  LOAD  VARYING 


(F78X14  GY  BB  CPCP  CAMBER=0..  SLIP=0.  ) 


• 

NORHflL 

LOAD 

= 

400.000 

-LBS 

A 

NORMAL 

LOAD 

= 

800.000 

-LBS 

■ 

NORMAL 

LOAD 

= 

1200.000 

-LBS 

■ 

NORMAL 

LOAD 

= 

1600.000 

-LBS 

X 

NORMAL 

LOAD 

= 

2000.000 

-LBS 

♦ 

NORMAL 

LOAD 

= 

2400.000 

-LBS 

08  JUN  76 
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SIDE  FORCE  * FSI  -LBS 


FIG.  1 SIDE  FORCE  VS.  NORMAL  LORD  WITH  SLIP  ANGLE  VARYING 


(F78X14  GY  BB  CPCP  CRMBERrO..  SLIP=0.  ) 


NORMAL  LORD  -LBS 


• 

SLIP 

RNOLE 

s 

1.000 

-OEGAEES 

▲ 

SLIP 

RNOLE 

= 

2.000 

-DEGREES 

■ 

SLIP 

RNOLE 

= 

4.000 

-DEGREES 

■ 

SLIP 

ANGLE 

= 

8.000 

-DEGREES 

X 

SLIP 

ANGLE 

= 

16.000 

-DEGREES 

♦ 

SLIP 

ANGLE 

s 

20.000 

-DEGREES 
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SIDE  FORCE  * FSI  -LBS 


FIG.  2 SIDE  FORCE  VS.  NORMRL  LORD  WITH  CRMBER  RNGLE  VRRYING 


(F78X14  GY  BB  CPCP  SLIP  RNGLE=0..  SLIP=0.  ) 


NORMRL  LORD  -LBS 


• 

CRMBER 

ti 

UJ 

z 

cc 

2.000 

-DEGREES 

A 

CRMBER 

RNOLE= 

4.000 

-DEGREES 

■ 

CRMBER 

RNCLEs 

6.000 

-DEGREES 

■ 

CRMBER 

RNGLEs 

8.000 

-DEGREES 

X 

CRMBER 

RNOLEs 

10.000 

-DEGREES 

♦ 

CRMBER 

It 

Ul 

z 

(X 

12.000 

-DEGREES 
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SIDE  FORCE  » FSI  -LBS 


FIG.  3 SIDE  FORCE  VS.  SLIP 


WITH  NORMfiL  LOAD  VARYING 


(F78X14  GY  BB  CPCP  SLIP  ANGLE=8.r  CA11BER=0.  ) 


SLIP 


• 

NORHRL 

LOAD 

s 

400.000 

-LBS 

A 

NORNBL 

LOAD 

= 

800.000 

-LBS 

■ 

NORMAL 

LOAD 

s 

1200.000 

-LBS 

■ 

NORHRL 

LOAD 

= 

1600.000 

-LBS 

X 

NORMAL 

LOAD 

3 

2000.000 

-LBS 

♦ 

NORMAL 

LOAD 

3 

2400.000 

-LBS 

483 


08  JUN  76 


CIRC  FORCE  » FCI  -LBS 


FIG.  4 CIRC  FORCE  VS-  SLIP  WITH  NORMAL  LORD  VARYING 

(F78X14  GY  BB  CPCP  SLIP  RNGLE=0-,  CAMBER=0.  ) 


SLIP 


e 

NORHRL 

LORO 

s 

400.000 

“LB8 

A 

NORHRL 

LORO 

s 

800.000 

-LBS 

m 

NORHRL 

LORO 

s 

1200.000 

-LBS 

B 

NORHRL 

LORO 

= 

1600.000 

-LBS 

X 

NORHRL 

LORO 

= 

2000.000 

-LBS 

♦ 

NORHRL 

LORO 

= 

2400.000 

-LBS 
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flLIDN  TORQUE.  MZ  - LB-IN 


FIG.  5 ALIGN  TORQUE  VS.  NORMAL  LOAD  WITH  SLIP  ANGLE  VARYING 


(F78X14  GY  BB  CPCP  CAMBER^O..  SLIP=0.  ) 


NORMAL  LOAD  -LBS 


• 

SLIP 

RNOLE 

s 

-1.000 

-DE0REE6 

A 

SLIP 

RNOLE 

= 

1.000 

-DEGREES 

■ 

SLIP 

flN&LE 

= 

2.000 

-DEGREES 

■ 

SLIP 

RNOLE 

s 

4.000 

-DEGREES 

X 

SLIP 

RNOLE 

s 

8.000 

-DEGREES 

♦ 

SLIP 

RNOLE 

s 

16.000 

-DEGREES 
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fiLIGN  TORQUE,  M2  - LB-IN 


FIG.  6 ALIGN  TORQUE  VS.  NORMAL  LOAD  WITH  CAMBER  ANGLE  VARYING 
(F78X14  GY  BB  CPCP  SLIP  ANGLE=0..  SLIP=0.  ) 


NORMAL  LOAD  -LBS 


• 

CAHBER 

II 

UJ 

2.000 

-DEGREES 

A 

CAHBER 

RNQLEs 

4.000 

-DEGREES 

■ 

CRKBER 

ANGLES 

6.000 

-DEGREES 

■ 

CRMBER 

ANGLES 

8.000 

-DEGREES 

X 

CRHBER 

ANGLES 

10.000 

-DEGREES 

♦ 

CRHBER 

ANGLES 

12.000 

-DEGREES 
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OT  MOMENT  , MX  - LB-IN 


FIG.  7 OT  MOMENT  VS.  NORMRL  LORD  WITH  SLIP  ANGLE  VARYING 
CF78X14  GY  BB  CPCP  CRMBER=0..  SLIP=0.  ) 


NORMAL  LORD  -LBS 


• 

SLIP 

RNOLE 

1.000 

-DEGREES 

A 

SLIP 

ANGLE 

= 

2.000 

-DEGREES 

m 

SLIP 

ANGLE 

= 

4.000 

-DEGREES 

m 

SLIP 

ANGLE 

- 

8.000 

-DEGREES 

X 

SLIP 

ANGLE 

= 

16.000 

-DEGREES 

♦ 

SLIP 

ANGLE 

= 

20.000 

-DEGREES 
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OT  MOMENT  . MX  - LB-IN 


FIG.  8 OT  MOMENT  VS.  NORMAL  LOAD  WITH  CAMBER  ANGLE  VARYING 


(F78X14  GY  BB  CPCP  SLIP  ANGLE=0.,  CAMBER=0.  ) 


NORMAL  LOAD  -LBS 


• 

CAHBER 

ANGLES 

2.000 

-DEGREES 

A 

CRMBER 

ANGLES 

4.000 

-DEGREES 

m 

CRHBER 

ANGLES 

6.000 

-DEGREES 

u 

CAHBER 

II 

UJ 

z 

cc 

8.000 

-DEGREES 

X 

CAMBER 

ANGLES 

10.000 

-DEGREES 

♦ 

CAHBER 

ANGLES 

12.000 

-DEGREES 
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RLION  TORQUE r MZ  - LB-IN 


FIG.  9 ALIGN  TORQUE  VS.  NORMAL  LORD  WITH  SLIP  ANGLE  VARYING 


(F78XU  GY  8B  CPCP  CAMBERrO.,  SLIP=0.  ) 


NORMAL  LOAD  -LBS 


• 

SLIP 

RNOLE  = 

-4.000 

-OEGREES 

A 

SLIP 

ANSLE  s 

“2.000 

-DE0AEE8 

■ 

SLIP 

AN&LE  s 

-1.000 

-OEGREES 

■ 

SLIP 

ANGLE  s 

i.ooo 

-DEGREES 

X 

SLIP 

ANGLE  - 

2.000 

-OEGREES 

♦ 

SLIP 

ANGLE  a 

4.000 

-DEGREES 

08  JUN  76 


489 


ALIGN  TORQUE,  tIZ  - LB-IN 


FIG.  10  ALIGN  TORQUE  VS.  NORMAL  LOAD  WITH  CAMBER  ANGLE  VARYING 


(F7BX14  GY  BB  CPCP  SLIP  ANGLErO..  SLIP=0.  ) 


NORMAL  LOAD  -LBS 


• 

CRNBER 

II 

UJ 

-4.000 

-DEGREES 

A 

CRHBER 

RRBLEs 

-2.000 

-DEOREES 

■ 

CRNBER 

II 

UJ 

-1.000 

-DEGREES 

■ 

CRNBER 

II 

UJ 

X 

(T 

1.000 

-DEGREES 

X 

CRNBER 

RNOLEs 

2.000 

-DEGREES 

♦ 

CRNBER 

It 

UJ 

z 

cc 

4.000 

-DEGREES 
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OT  MOMENT  . MX  - LB-IN 


FIG.  11  OT  MOMENT  VS.  NORMfiL  LORD  WITH  SLIP  ANGLE  VARYING 


(F78XU  GY  BB  CPCP  CAMBER:=0..  SLIP=0 


3000.0- 


2000.0 


-1000.0 


-2000.0 


-3000  .Ot 1 — n — 4— — '"i - -"T- — II  — T It- — 1 

0.0  400.0  800.0  1200.0  1600.0  2000.0  2400.0 

NORMAL  LOAD  -LBS 


• 

SLIP 

RN(H.E  r 

-4.000 

-DEOREES 

A 

SLIP 

RNQLE  s 

-2.000 

-DEGREES 

■ 

SLIP 

AN(M.E  s 

-1.000 

-DEGREES 

■ 

SLIP 

RNOLE  s 

1.000 

-DEGREES 

X 

SLIP 

RNSLE  s 

2.000 

-DEGREES 

♦ 

SLIP 

RNOLE  s 

4.000 

-DEGREES 

1000.0 
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OT  tlOMENT  . MX  - LB-IN 


FIG.  12  OT  MOMENT  VS.  NORMfiL  LORD  WITH  CAMBER  ANGLE  VARYING 


(F78X14  GY  BB  CPCP  SLIP  RNGLE=0..  CRMBER=0.  ) 


NORMAL  LOAD  -LBS 


m 

CRHBER  AN&LEs 

-6.000 

-DEGREES 

A 

CRMBER  BNBLEs 

-4.000 

-DEGREES 

m 

CBHBER  ANBLE- 

-2.000 

-DEGREES 

B 

CANBER  ANGLES 

2.000 

-DEGREES 

X 

CAHBER  ANGLES 

4.000 

-DEGREES 

♦ 

CAMBER  ANGLES 

6.000 

-DEGREES 
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2 . PRESENTED  HERE  IS  A COPY  OF  THE  INFORMATION 
AVAILABLE  FROM  REFERENCE  17  FOR  A PARTICULAR 
TIRE.  THE  PARAMETERS  FROM  THIS  DATA  PACKET 
WERE  USED  TO  GENERATE  THE  GRAPHS  IN  SECTION  1. 
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tire  identification 


tirf  tire  number 

SIZE  

manufacturer  (distributor) 


01  I 

F 18-14 
QY 


CUSTOM  POWEt?:  CLiSmoU  POLYGCAnS 


load  range  (ply  rating) 

B 

max  T&RA  load,  lb 

1500 

MAX  INFL  PRESS,  ps 1 

32. 

NO  OF  PLIES 
AND  CORD 

material 

TREAD 

2.  P + 2.  F 

SIDEWALL 

2.  P 

DOT  NO 

MP  L7  D DA  S2,  3 

CONSTRUCTION  TYPE 

BB 

ASPECT  RATIO, COMPUTED 

IS.  8 

T&RA  RIM  WIDTH 

5.50 

SHORE  HARDNESS  (STD  VAR) 

S3.8  ( ) 

REMARKS 

tirf  run  identification 


RUN  NO  (0602-S3rle3) 

389 

ROAD  SPEED,  mph 

30 

WATER  DEPTH,  mil 

COLD  INFL  PRESS,  ps 1 

24 

100^  DESIGN  LOAD,  lb 

1^60 

RIM  WIDTH,  In 

5.50 

GROOVE  DEPTH,  % 

100 

ROAD  SKID  NUMBER 

DRY 

85 

WET 
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notations 


BFO 

GOODRICH 

CO 

COOPER 

DA 

DAYTON 

DU 

DUNLOP 

FI 

FIRESTONE 

GT 

GENERAL  TIRE 

GY 

GOODYEAR 

KS 

KELLY  SPRINGE 'D 

LE 

LEE 

MI 

MICHELIN 

PI 

PIRELLI 

SE 

SEARS 

UN 

UNI  ROYAL 

B 

BIAS  PLY 

BB 

BIAS  BELTED 

R 

RADIAL  PLY 

F 

FIBERGLAS 

H 

HIGH  PERFORMANC:, 
ORGANIC  FIBER 

N 

NYLON 

P 

POLYESTER 

R 

RAYON 

S 

STEEL 

TT 

TUBETYPE 

TL 

TUBELESS 
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TIRE  UNIFORMITY  (SAE  RECOMMENDED  PRACTICE  J332A) 


TIRF  TIRE  NO 

oi  1 

TEST  LOAD  at  28  psi,  lb 

1090 

RADIAL  FORCE  VARIATION 

TOTAL 

PEAK-TO-PEAK,  lb 

FIRST  HARMONIC 

4 

lateral  force  VARIATION 

TOTAL 

8 

PEAK-TO-PEAK,  lb 

FIRST  HARMONIC 

4- 

MEAN  LATERAL  FORCE,  lb 

FORWARD 

~4o 

REVERSE 

4-27 

CONICITY,  lb 

PLY  STEER,  lb 

-35 
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CORNERING  COEFFICIENTS 


RUNJ  389-  2“  6 

cornering  STIFFNESSf  LB/RAD 

AO 

3318.89 

A1 

7.40 

A2 

2804.77 

CAMBER  STIFFNESSf  LB/RAD 

A3 

1.266 

A4 

6024.23 

PEAK  LATERAL  FRICTION  COEFFICIENTt  LB/LB 

B3 

1.143 

B1 

~2.848E“04 

B4 

4.342E“-08 

OVERTURNING  MOMENTt  FT  LB 

Cl 

C2 

-1.162E“04  'o 

“5.638E--05  - ~ 

C3 

°K).446 

ALIGNING  TORQUE,  FT  LB 

K1 

-2.445E-04  - 2-.f3  4 

K2 

2.343E-04  2.  g«2.  'o 

K3 

0.127  ». 

♦ TEST  DATA 


LOAD 

CALPHA 

CA/F2 

NALPHA 

NA/FZ 

NA/CA 

LB 

LB/DEG 

LB/DEG/LB 

FTLB/DEG 

FTLB/OEG/LB 

FT 

2234.8 

119.6 

0.054 

51.6 

0.023 

0.432 

1913.8 

132.6 

0.069 

46.2 

0.024 

0.349 

1595.0 

144.2 

0.090 

40.0 

0.025 

0.277 

1276.3 

149.5 

0.117 

30.1 

0.024 

0.201 

959.9 

145.0 

0.151 

20.6 

0.021 

0.142 

637.3 

118.3 

0.186 

10.8 

0.017 

0.092 

LOAD 

CGAMMA 

CG/FZ 

NGAMMA 

NG/FZ 

NG/CG 

LB 

LB/DEG 

LB/DEG/LB 

FTLB/DEG 

FTLB/DEG /LB 

FT 

2234.8 

33.0 

0.015 

4.4 

0.002 

0.134 

1913.8 

28.1 

0.015 

4.0 

0.002 

0.142 

1595.0 

25.0 

0.016 

3.6 

0.002 

0.145 

1276.3 

22.4 

0.017 

3.5 

0.003 

0.158 

959.9 

20.6 

0.021 

3.6 

0.004 

0.172 

LOAD 

LB 

CG/CA 

MUY  PEAK 

SA  a MUY  PEAK 
DEG 

2234.8 

0.276 

0.73 

28.8 

1913.8 

0.212 

0.74 

21.5 

1595.0 

0.173 

0.80 

19.3 

1276.3 

0.150 

0.86 

18.4 

959.9 

0.142 

0.91 

17.1 

637.3 

0.98 

“15.2 

497 


BRAKING  COEFFICIENTS 
RUNS  464“  2“  6 


PEAK  BRAKING  COEFFICIENTt  LB/LB 


PO 

1.0635 

0.8879 

, PI 

~2.127E“04 

3.651E“05 

P2 

“8.913E“08 

PEAK  LONGITUDINAL  SLIP 

RO 

“0.180 

R1 

“2.230E“06 

SLIDE  BRAKING  COEFFICIENT,  LB/LB 

SO 

0.7873 

0.9844 

SI 

“1.257E“04 

“4.221E“04 

S2 

1.040E-07 

TEST  DATA 


LOAD 

LB 

SL  PEAK 

MUX  PEAK 

MUX  SLIDE 

CS 

Lb 

CS/F2 

LB/LB 

1906.4 

“0.196 

0 .647 

0.562 

20341.1 

11.55 

1589.0 

“0.170 

0.740 

0.566 

24428.9 

16.43 

1270.4 

“0.172 

0.797 

0.628 

25350.7 

20.99 

954.3 

“0.193 

0.853 

0.674 

17271.0 

18.80 
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1 F Y aB:'  RUH  389-  2-  6 
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500 
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